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Nuovi record CBM 


Anche nei primo trimestre del nuovo 
anno finanziario la Commodore Inter- 
national ha registrato risultati eccezio- 
nali, Eccoli: 

•vendite: + 9G ? S% ; 

•utile netto: + 83.4% ; 

•per azione: + 85,1 %. 

Queste cifre sono state comunicate 
da Irving Gould, presidente della Com- 
modore International Ltd, il quale ha 
dichiarato che: d'attuale domanda per 
i prodotti Commodore contìnua ad es- 
sere altissima e ci aspettiamo anche pei 
il prossimo trimestre risultati eccellen- 
ti. Crediamo inoltre che per quanto ri- 
guarda tutto Tanno in corso, vendite, 
utile netto e guadagni per azione saran- 
no tutti notevolmente superiori ai ri- 
snliali record registrali nell'anno fisca- 
le 1982 die sì ù chiuso il 30 giugno 
1982”. 
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UNA NUOVA E SENSAZIONALE ROM PER OPERARE IN LINGUAGGIO MACCHINA DISPONIBILE PER 
2001 (NEW), 3032, 4032, 8032, (IN PREPARAZIONE PER VIC 20) 

< > MICROASSEMBLER C 3 SYS 39580 


< I > INSERIRE ISTRUZIONI IN CODICE MNEMONICO 

< K > DIS ASSEMBLARE LA MEMORIA IN MNEMONICO (LIST) 

< E > ESAMINARE LA MEMORIA IN ASCI ED IN CARATTERE 

< G > ESEGUI IL PROGRAMMA ED EVIDENZIA IRQ P A X Y S 

< R > RICERCA IL CARATTERE O IL GRUPPO DI ISTRUZIONI 

<M> MUOVERE I DATI DA MEMORIA A MEMORIA 

< A > ALTERARE IRQ-STACK-BRÉAK-NMi 

< S > SOSTITUIRE ISTRUZIONE O GRUPPI Di ISTRUZIONI 

< C > CONVERTI DA ESADECIMALE A DECIMALE E BINARIO DA 16 BIT 

< V > VISUALIZZARE CON CONTINUITÀ' 2 MEM. IN PAGINA ZERO 

< T > SCRÌVI UN TESTO IN LINGUAGGIO MACCHINA 

< L > VAI IN LINGUAGGIO MACCHINA RIPOSIZIONANDO LE PAGINE ZERO 

< B > TORNA IN BASIC RIPOSIZIONANDO LE PAGINE ZERO 

IN PIU’ 28 ROUTINE DI USO GENERALE RICHIAMABILI ANCHE DA BASIC. 


COSTO DELLA ROM 4- MANUALETTO DI ISTRUZIONI L. 90.000 + IVA 
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Campioni del Vie 

ISTANTANEE della premiazione dei vincitori del torneo 
Vic-20 organizzato durante il recente Smau ’82. 

L’elenco compjeto dei premiati è il seguente; 

* Alberto Spotti T C.so Lodi 1 10/ A, 20 139 Milano; 

• Giovanni Pisanò* Via Garofalo, 19,20133 Milano; 

* Giorgio Ghiozzi, Via Guardi 50, 20092 Cinisejlo Balsa- 
mo ; 

• Alessandro Capitani, Residenza Ponti, 20090 Segnile ; 
•Marco Pisanò, Via Garofalo 19, 20133 Milano; 

• Matteo Pace, Via Benvenuto Celimi 3, 20129 Milano; 

* Fabio Ferrari, Via Cavalieri di V. Veneto 11. 28100 


BUON SOFTWARE GESTIONALE PER PET/CBM 

Programmi collaudati - semplici - affidabili - veloci - efficienti 

i programmi girano presso ftasÉrf dienti di diro duo and, Funzionano con qua- 
lunque CQfìbbàzhme ÌDÌ 214032/8032 + 3 04 0/4 Q4 CW3 OS 0>S 2 5 Q. Adivamo im- 
piegata trituri di "kìgcgncTui umana' od ogni potòrio soHiHc azione storica te* 
!«'• intiero S'usu semplice e scorrevole, Ceuiorie cfeUe mauhrn- mediante 
sufovutincs implementate ivi ROM- imfXKiibfiv bloccare un programma o spor- 
Cdn- 1 il videa Futtf ì tiò fitoggt JU 72 diro. Celione degii orrori da cfoca 
acuì ria dì uontrofio, Hard -copy \ nornvi di IL i fcgis/aziarte vigente. Cam. da/i di 
• ••■ttagikii, manuali d'uso. Aggiorni wììedr.tinìente ì pre/s . i t.ontpremfono. 
ROM. dhopariantu, corso daddedumcnto od assistenza ai! \ icmn -rifa. 

5EMPL contabilità seinplàlìcau - Gira su due soli dischi [disco pr^rarwrt + 
dsco diti!). Capacita ma* 1200 cliotti + lomtton. Registri stampati a |x>storioiì 

ustione di brogliceli')*. Vcmìlazkifie e scotptjru, die hiif azione IR PCF allegali 

(V\ eoe, CSenM e fornitori richiamati con codice ^mtxJico assegnato daB'u- 
lente (fiossi si chiama «Rossi* e non *1234*). Velocità dì èòi^biliizzdzione: 5 
sec.-figa cfocumento. t. 1.490,000 

GÉMAF contabilità generale - tira su due soli dischi disco programmi + di- 
sco contij. Capacità max 3000 dienti o fornitori +- 900 conti + 9? mastri. Re- 
ttóri ed Alterili IVA giornate bollato, belano, «tratti Conio, eoe, Velocità di 
corUabili^zazione: 2 seemg^ giornale. L 199Q-0G0 

Opzione MAGAZZINO & FATTURAZIONE pf GEMÀF rutta 

ia procedura contabilita 4 nwgazzfìQ * fatturazione eira su tre sdi dischi 
idiwio programmi 4- disco conti + disto magazzino), Cop«ti ità ma* {DOCK) ani- 
odi. Giornale di magazzino, UFO. Fatturazione totalmente in linea, con ge- 
stione in tempo reale dei progressivi cJj scarno e dei yHEo scorta traisi rizione 
immediata in puma nota. Cedrino agenti. Stampa effetti. Cestiste art itoli, 
jjf «fazioni. maggiorazioni e sconti in qualunque tdoibniiazime, L. StHJ.lMK) 

Opzione PRODUZIONE pus GEMAF - Distinta ba se a u livelli lino a 
max 2000 componenti per prodotto finito. Sviluppo automatico dei movi- 
menti dì carico e scarico. Lancio dì commesse con controllo scorte. L StìG.ùOtì 

Tutti ì programmi sono coperti dalla speciale garanzia 
premio di L. 100*000 a chiunque segnali utì errore software. 

Concessionari / Installatori autorizzati in tutta Italia 

Sistemi gestionali Commodore a partire da L. 4*990,000 


COMPU - computi metrici. Consento di gestire un archivio veci, ese- 
g:i n- v,ri.j/ii>n pmz/;. u Pipila se u>mpuli ni'-m. iri/zai li. -muli re, irli *- sLirMpaf- 
h con vari formati. Ogni voce può contenere max ItXJ righe di descrizione. 
Aggiornamento prezzi automatico su tutti i tnmpuii. t.e espressioni matemati- 
che dei parziali sono riportale -n stampa. COMRU utilizza ie stesse solfSticate 
tecnklx 1 di programmazione ck j ! no^tr: ■ software gestionale. Ueffk'iente orga- 
nizzazione delle maschere unita alta possibilità dt ricbj,imare te v c>c i coti codi 
c.e apflrfanteij consente un 'eccezionale- scorrevolezza ndFuso. L. 500,000 


LE SUPER ROM LOGICA 

Potenziano II Basic Commodore aggiungendo nuove istruzioni 

Programmerà Tool kit aggiunge i comandi AUTO. DELE TE, RENL'MEifR, 
I in P. TRACE". STEP. OFF, DUMP, AJPPtND, FINO, la Rotn più venduta nel 
mondo. Assolutamente indispensabile per chi sviluppa programmi. L B5.tXK] 

Comniand-O pei T032 e 6032 - aggiunge i comandi del l oolki? i coowni.Ji 
‘ìTNO. OUT. KILL BEEP. PRIMI USIMC, e funzioni di editing (scrùl, repeat, 
eat. tasto funzione;. La Rom pici completa. L. 135.00Q 

Rom ELPRO - Input controllalo, slarr^je fejrmattate. Hard roov dn vrtleo. con- 
trollo dei cursore (istruzioni CURS, CLEAR, E.MTER OUT, DÈV1C E, LCASt, 
HDCPY), Per professionalizzare i vostri pmg^rmtiì. L, 95,000 

BASIC 4,0 - 5t?t di Roms pei tras-f Ormare il 3032 in 4032 L. 150.000 

SPACEMAKFR - Permette di montare fino a 4 Rcims sullo stessi zoccolo e 
selezionarle con un commutatore. L fìtì.000 


COGNIVtìX - Terminale Voice Input Output per Ut parlare e ascoltare i 
PpT CBM - completo di hardware e software dimostrativo L. 349.(300 

COMPUCRUISE - Computer di bordo per auto regolazione automatica del- 
la velocità - completo di parti meccaniche. L. 299.000 


gli specialisti Commodore 

dr. ing. Mario Pavesi 

Via SkHioTm 6 - 46100 Mantova - Tel. (0376) 350.236 
Prodotti Commodore e SkxusJ vendili diretta e per c r>m_s/x>nciur7Zf? 



















Commodoriant 


Happy Magic 
e il Vie 
d’amore 


Un nuovo personaggio anima la 
popolare trasmissione Happy 
Magìe: è il Vìe nel ruolo di 
segretario galante. Ma alla fine 
la bella principessa ( Federica 
Moro ; miss Italia '82) se ne 
innamora pazzamente e fogge 
fontano col piccolo computer. 
Un CBM per ì bioritmi di 
Paolo Cavallina, prossimo 
commodori ano, 


LÀ SIGLA è de “Gli America” 
e va in onda tutte le sere dalle 
18*50 alle 19,45 sulla rete 1 della 
Rai. Con 6,5 milioni di spettatori 
al di sopra dei 14 anni (pari al 
60-65^ delCa udience televisiva 


totale del Paese)* Happy Magic è 
certamente una delle trasmissioni 
più seguite del momento. Ma i 
meriti “edmmod ariani” dì que- 
sto spettacolo sono altri. Da una 
settimana, infatti, nel cast degli 
attori figura un nuovo personag- 
gio: iì Vie 20. 



Foto di gruppo con CBM: in senso 
antiorario, il Mago d 'Amore, la bai 
ter in a Susanna Argenterie, la prin- 
cipessa (Federica Moro), il pnnei- 
pe- presentatore cteMo spettacolo 
Sammy Bar hot, ed il servo Pongo. 
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STAMPANTE SEIKOSHA GP’IQOVC 

Estrema mente me ressa ■'te per II suo basso 
costo queste sia m pente può essere co • legata 
direttamente all'uscita del VIC 20. di co ; 
possiede l'intero set di caratteri, simboli ed 
elc-ment: c . 

Ca r atter : st I che tee n ìch<e : 

Stampa a impatto unidirezionale. 

Interfaccia serialp. 

Matrice: 6*^ 

Set di caratteri 1 u4 t minuscol .maiuscoli, 
grafici, elongati idoppia larghezza), 

Nomerò di colonne: SO 

Velocità: 30 caratteri, 'secondo 15 7,5linaB/s) 
Spaziatura: 10 caratteri per pollice 
Inte^iinsa 6 -f- 9 linee pe' pollice 

TC/2026 00 L . 550.000 



REGISTRATORE C2N-VEC 

Registratore a cassette adibito a memoria di 
massa per j computer della Commodore. 

Già Interamente interface iato, viene alimentato 
dallo stesso com^uT-zr monta i contagiri di 
seria 

TC/2022-00 L. 1 20.000 



ADATTATORE PER REGISTRATORE 

L'adattatore VCX T 001 consente il collegamento 
di un normale registratore ai computer VIC 20 o 
alla serie PET/CBM. 

TC/2023-00 L. 30,500 



STAMPANTE VC1515 

Si connette direttamente al 'use ta ser a c del 
VIC. 

Cyratterisiicne tecniche 
Tipo d. stampa: a impatto jnidirez:onale 
ntengee u seriale 
Ma tr ice : 5X7 

Set di caratteri minuscolo, meiusco o, predico, 
cossi l> lira d caratteri: elongatf. 

Numero colonne SO e in gr^ f ica 480 punti 
Velocità 30 caratteri a- secondo. 

Spaziatura ì? caratteri per pollice. 

TC/2025 00 L. 650,000 



FLOPPY DISK VC 1540 

Mini floppy digfe gff debile e silenziose 
collegabile direttamente al VIC 20 
Utilizza dischi da o : 4 irteh. singola faccia, 
doppia densità. 

Capacità 170 Kp. 

DOS contenuto Su PGM. 

’ 'Po di fi : e seauunzigl», random. relativo. 
TC/203Q-00 1,650.000 
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CARTRIDGE DI ESPANSIONE RAM 

Queste schede consentano di espandere la 
memoria alfa configurazione desiderata. 

Una scheda singola si connette direttamente al 
computer: mentre per collegare più schede 
contemporaneamente si ricorre a' cabinet d 
espansione (TC/205&'001 . 

TC/2035-00 Espansione da 3K L. 06.000 

TC/2Q40-0G Espansione da SK L. 96.000 

TC/2045'00 Espansione da 16K 1,172.000 


INTERFACCIA RS 232 C/FULL 

Permette ci irssmotisre dati ir- jscfta su una 
periferica co n tutti : segnali d uos R5 232 C ^ 

1.3 ricevete i dati da ima iti -h-, pa 

TC/21 25-00 L. 190.000 



CARTUCCIA TOOL Kilt 

Cartritige molto interessante che facFI y: 
ehorrTiGiT unte la stes re Pei programm con 
I egg unta di nuovi cornano i BASIC 
(RENUMBER, MERCÉ. F I ND. CHANCE 
STEP.QFF, KE Y. ED 17, PROG: e permette 
assegnazione di nuovi comandi 9 tesi - d 
funzione 

T C/2050-00 L. 47 .500 



LIGHT-PEN 

La penna ottica è un accessorio che permette di 
tracciare o rilevare linee o punì'' sullo schermo 
video, tramile software 
Il dr ncloio di funzionannenta si basa sul 
rilavamento dello spot luminoso su un quadro 
di sintesi televisiva. 

Poiché Questa sintesi si costruisce con tempi 
oen conosciuti del computer il passaggio dello 
5 coi davanti ella penne, darà le coordinate 
orizzontali e verticali che verranno collocate in 
due locazioni di memoria. 

La "light-pen ' va epilogata alla control porr. 
TC/21 00 00 L. 98.000 



MONITOR PER LINGUAGGIO MACCHINA 

Cartridgs che consente di programmare il 
VIC 20 in linguaggio macchina, facilitandone 
l'apprendimento e I utili zìo. E' co nsi glissile 
tuitav la. anche se 'a scheda non richiede 
particolari doti di abilità 0 esperienza, avere 
qualche nozione sulla programmazione 
assembler del microprocessore 6502. 

TC/2065-00 L. 47 500 




ROM CONTENÈNTE VIC-KfT 

La VlC'KZT f~ .ir’i< eprom ris 2Kcheda 

possibilità al programmatore di usufruire di un 

set di comandi dii utilità quali 

AUTO ■ assegna automaticamen te il numero rii 

linea secondo un passo desiderato 

DE LÈTE ■ canoe I fa le mer specificate 

noi l'argomento. 

F IND - ricerca il numero di linea in cu,i si trova 
un d sterri nato argomento che può essere- una 
stringa ispcc Lenta tra joicii' oppure un comande 
q un istruzione BASIC. 

RÈNUMBER - esegue la renymergzione 
automatica delle lince di programma, 

TRACE ind'ea il numero dì linea che e stato 
eseguito 

DUV1F . mostra le variaci li e \ì loro valore ne. 
programma. 

HE Li 1 - loca iizza il numera di linee in cui vi e 
stato un errore. 

La VlC-KI f viene attuata cori il comando SYS 
e deve essere inserita nella VlC memory board 
(TC/21 30-00) o nel fa rom board ET C/21 20-00). 

TC/21 05*00 L, 99.500 



MULTIPLEXER PORTA GIOCHI 

Permette ria connettere contemporaneamente 
due joystick con il tasto "PIRE”. I valori delle 
coordinate J 'X" e "Y' J nel campo da 0 a 255 
vengono letti in maniera iridipendente 
li segnale H, FlRE" è multi Dlpxato. 

TC/2115-0Q L, 1 23.000 



PADDLE 

Pratiche per i giochi in 2 persone lePADDLES si 
collegano alia controi port ed eseguono 
spostamenti in orizzontale o in ver lica ! e. 

An [ih esse sona munite di tasto Jf F|RH , j . 

T C /2095-QG L . 22 ,500 


INTERFACCIA RS 232 

TC/2060 00 L, 75.000 

INTERFACCIA RS 232-TTY 

TC/2G65 QQ L. 75,000 

INTERFACCIA IEEE 4BS 

TC/2OBQ-G0 L.1 13.000 



COPERCHIO PER CABINET 

TC/2057-00 i_, 30 000 



SCHEDA PER ALLOGGIARE ROM/EPROM 

Questa scheda offre ! "opportunità di espandere 
notevolmente il proprio sistemai permettendo 
all 'utente dr inserire 4 EQM/EPROM da 2/4 K 
ciascuna La Fioro gwìch board si attiva tran ite 
delle PQKÈ 

Esiste noi tre un connettore por l'inserzione d 
cartridge esterni 

TC/21 20 00 L. 150.000 



19 K RAM CON BACK UP 

L.a V R E. e una memoria □ I9K RAM 2 
blocchi da BK + 3K) che consente il 
mantenimento dei dati in memoria & computer- 
spento per diversi mesi. 'FI bpek-up si riferisce ad 
un banco di memoria dr ibK RAM in tecnologia 
C’MOS. La scheda dispone inoltro di uno zoccolo 
libero per l'inserimento di una RQM/EPRQM 
da 2/4 K ed una porta per parer connettere 
cartucce Esterne 

Nella confezione vi è acclusa una cassetta 
con lenente un programma in linguaggio 
macchina che permette di leggere il contenuto 
di un« RQM % pi salarlo su nastro o cfisco. 

Con qualche pìccola modifica é possibile 
coi legare Fa V. A E . al Pt T . 

TC/21 30 00 L, 450.000 


ESPANSIONE PER ALTA RISOLUZIONE 

Questa interfaccia oltre ad espandere di 3KB la 
memoria utente del VlC 20., aggiunge parecchie 
'struzioni □! Basic orientate preva lenterrien te 
alla grafica, alla gestione del suono e della 
control port La risoluzione più alta in grado di 
ottenere è di 1024 x 1024 pixel. 

TC/2075-Q0 L, 75.000 

JOYSTICK 

LTi i ss ito ne giochi, permette di spostare il 
cursore nelle 8 direzioni principali e, tramite il 
ìa&tb "FJRE ". di scorare o di dare lo START 
a vari giachi dì mov mento. S' college alia 
control -port. j 

TC/209O-00 L, 13.500 



SCHEDA 19K RAM 

La "VlC memory c^pansion" è in grada di 
emenderò i 5K del VlC fino a 32K. Neiso 
configurazione di base è fornita di 3 6K+3K 
RAM alfa quale vi è la possibilità di aggiungere 
fmo a un massimo di 4 chip eli memoria di 2K 
ciascuno ocr raggiungere la massima 
con figurazione. E' predisposta inoltre per 
l'inserimento di una HOM/EPROM da 2/4 K che 
si attiva con il comando Sys. 

Nel retro del a scheda è esponibile una porca 
Che permette di connettere cartucce esterne 

TC/2135-00 L. 420.000 



CABINET ESPANSIONE PER 7 SCHEDE 

Accessorio quasi indispensa bile par gli utenti de! 
VlC 20. ù CASi NÈT di espansione offre la 
possibilità di amobare il sistema aila 
configurazione massima di RAM !32K > e di 
ingerire i vari cartridge (giochi, grafica alta 
risoluzione, aiuta glia programmazione, occ ì 
co n tem porenea m e n te 
Oi aspetto gradevole e funzionale rende il 
sistema compatto grazie alla predisposizione per 
l'inserimento del moduli *** alia possibilità 
di n sta Ilare un coperchio ITC/2GbA0Q) che 
oltre □ proteggere le schede inserte nel cabinet, 
offre- un valido appoggio per un eventuale 
televisore, il contenitore è interamente in 
alluminio e contiene: la nnother board che può 
ospitare f no a 7 cartucce esterne ed un 
alimentatore sw^tch-Moda c'n^ provvede ad 
alimentare l'intiero sistema tramite la User^port, 
T C/2055 00 L . 295 .000 


Prezzi netti, IVA esclusa 


Per informazioni scrivere a CASÈLLA POSTALE I048S - M : iANO 





Susanna Argentario si esercita coi Vie durante 3<l pausa delio spettacolo, ma ha dimenti- 
cato di col legare il cavo. 


Giorni felici con Fonde 

Il nome della trasmissione de- 

4 

riva dalla serie di telefilm Happy 
Days, protagonista il giovane 
eroe Fonde, che occupa 20 dei 
55 minuti dello spettacolo. Lo 
scorso anno la rubrica si dilania- 
va Happy Cìrcus in quanto sì 
svolgeva al l'interno sTun circo. 

Con l'S2 lo scenario è cambia- 
to. La vicenda che fa d* -^ale 
filo conduttore ha luogo * ai 
castello medievale (le : 
riferiscono a quello di Fi*as in 
Val d'Aosta) dove la magia è di 
casa, in un mondo fantastico che 
riesce ad unire il medioevo e il 
futuribile degli alieni. Da qui il 
nuovo titolo. Happy Magic, 

Presentatore-animatore dello 
spettacolo (e principe del castel- 
lo! è Sammy Barbot. pazzamente 
innamorato della principessa del- 
la favola, impersonata da Federi- 
ca Moro, 18 'anni, miss Italia 
i 1982. 

Per conquistarne le grazie il 
principe si rivolge al "Mago 
d’amore" (Walter d "Amore) che 

con magie, filtri , ed incantesimi 
cerca di far realizzare il sogno dei 
suo signore. Ma tutto è vano. 

À partire dalla decima punta- 
ta in favore del principe, e in 
concorrenza col Mago, interviene 
i] Vie 20, suggerendo frasi d amo- 
re in grado di intenerire i! cuore 
della principessa. 

Accedendo ad una fantastica 
base di dati, it VlC ripesca dalla 
letteratura e dalla poesia le frasi 
più galanti che il principe dovreb- 
be suggerire alla sua amata. La ri- 

W-CofTìpui&tOkit> 


cerca avviene sulla base di un te- 
ma proposto dallo stesso princi- 
pe. Ad esempio, richiesto di for- 
mulare una poesia con le parole 
"riamo", il Vie rispondendo con 
i versi di Carducci "riamo, pio 
bove", alla cui declamazione la 
principessa non può rispondere 
die con uno schiaffo. 

Un altro giorno, richiesto di 
fornire una frase imperniata sulla 
parola chiave "verdura”, il Vie 
rievoca i versi di Guido GuinzeBi 

ai cor gentile ripara sempre 
amore come a la selva augello in 
fa verdura. 

Per la chiave "cerbiatta giova- 
ne’, il piccolo computer viene 


fuori con Anacreonfe in "vorrei 
tenerti fra le mie braccia - come 
pastore una cerbiatta giovane". 

La cultura del Vie è senza li- 
mite; le frasi di Dante, infatti, si 
alternano a quelle di Properzio, 
di Shelley e di numerosi altri 
poeti ed autori delle varie epo- 
che, 

II Vie si rivela più bravo ed 
efficace del Mago d’amore, tanto 
che alla fine la bella principessa 
se ne innamora perdutamente e, 
dimenticando completamente il 
principe, fugge col piccolo com- 
puter. 

Un altro personaggio dello 
spettacolo è il CBM 8000, nel 
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Le sorelle Ma bel ed Ambra Bocchi sono le armigere e custode dei ceste! fo. Nota anche come campionessa di basket, Ma bel Bocch è 
altresì cointeressata ai la gestione di un Bft-Shop Primavera, a Milano, 


ruolo di aiutante di Paolo Cavalli- 
na che tutti i mercoledì^ e giovedì 
conduce delle interviste durante 
la trasmissione. Gli ospiti di Ca- 
vallina sono di diversa provenien- 
za. Ultimamente hanno parteci- 
pato alla trasmissione Ceditore 
Franco Maria Ricci, Ottavia Pic- 
coli, la Caria, Fiorucci, ... il diret- 
tore generale della Commodore 


Italia, Sergio Messa. 

Il Commodore calcola e stam- 
pa la carta dei bioritmi per i pros- 
simi due mesi, che lo stesso Ca- 
vallina consegna agli interessati 
con acute annotazioni subito do- 
po l’intervista. 

Ma lavorare con un collega di 
questo tipo, è stato “fatale” per 
la maggior parte del cast. Ora. in- 


fatti, Paolo Cavallina ha deciso di 
comprare un Per per la sua conta- 
bilità e per scriverci gli articoli, 
mentre il regista di Happy Magic, 
Adolfo Lippi, e lo stesso Ranuc- 
cio Bastoni, hanno deciso che 
quest’anno a Natale ai propri figli 
regaleranno dei Vie. Il club dei 
commodoriani, cresce sempre 
più. ■ 
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Riservato 
agli ingegneri 


Il miglior software tecnico 
su elaboratori CBM - Commodore 


“S.S.-80” 

L ormai famoso programma per il calcolo delle strutture inte- 
laiate piane in c.a., in zona sismica, che sviluppa e disegna 
anche le carpenterie delle armature. 

{Ultima versione Luglio/1982 nostra esclusiva). 

“FONDAZIONI” 

Risolve tutti i problemi di fondazioni (trave elastica su suolo 
elastico) di strutture in c.a. in zona sismica e non, risolvendo 
l'intero graticcio di fondazione e proponendo una carpenteria 
sofisticata ed ottimizzata. 

“MURI DI SOSTEGNO” 

À gravità, a mensola o a contrafforti, anche in zona sismica, 
secondo il D.M. del 21/1/1981. 

“PENDÌI” 

Analizza la stabilità di un pendio o dì un fronte di scavo sotto 
diverse condizioni e la verifica relativa viene condotta in termi- 
ni di tensioni effettive; la stima dei fattori di sicurezza viene ef- 
fettuata secondo i metodi di Fellenius, Bishop e Jambu. 

“COMPUTI METRICI” 

Analisi ed elenco prezzi Metodo veloce e completamente 
automatizzato per il computo e la stima dei lavori. 

“REVISIONE PREZZI” 

Secondo le disposizioni di legge vigenti. Praticità ed automa- 
zione consentono di eseguire velocemente revisioni di prezzi 
anche per lunghi periodi. 

Richiedeteci documentazione e output dei programmi di vostro interes- 
se. Resterete sbalorditi dalla versatilità e dalla completezza dei nostro 
software. 


SIRANGELO COMPUTER Srl Via Parisio 25 - Cosenza 0984-75741 


NEW NEW NEW NEW NEW NEW NEW NEW NEW NEW NEW NEW 

È pronto il nuovissimo programma 
“ORARIO SCOLASTICO” 





V1CALC ò una cassetta che tra- 
sforma il Vie in una calcolatrice 
sofisticata di facile impiego. Con- 
sente di operare su 10 memorie e 
quattro registri visualizzati co- 
stantemente sullo schermo. 

Il Vicalc è utilizzabile anche 
su Vie non espansi in memoria 
RAM ed esegue calcoli che richie- 
dano fuso delle quattro opera- 
zioni aritmetiche, interessi, per- 
centuali ed alcune funzioni scien- 
tifiche* 

Cosa sì può fare 

Il Vicalc, scritto in basic* pos- 
siede quattro registri di dati, da 
A a D, e dieci registri di memoria 
numerati da 0 a 9 costantemente 
visualizzati sullo schermo. L'inse- 
rimento dei valori da parte dei* 
Tutilizzatore è molto semplice: 
digitando il valore e battendo 
RETURN II numero viene inseri- 
to nel registro dati più basso (À) + 
Qualsiasi altro dato introdotto 
successivamente sposta il prece- 
dente verso l’alto (B, C e poi D), 

Sono possibili cinque tipi di 
operazioni: 

1/ Operazioni fra due numeri II 
risultato di queste viene sempre 
posto nel registro A cancellando 
il contenuto di B e spostando in 
basso quelli di C e D. Le opera- 
zioni possibili sono: 
S+A;B-à;B*à; B/A; A/B; A+ 
(B/100); -A 

2j Funzioni. Sono disponibili ot- 
to funzioni predefinite che depo- 
sitano il risultato nel registro-dati 
A. Esse sono: A/e; ln(A); log 



(base) (A) in cui la base è quella 
memorizzata nel registro di me- 
moria N.9; radice quadrata; ran- 
dom (0), Infine le funzioni trìgo- 
nometriche, misurate in radianti, 

SIN(À); COS( A); TAN(À), 

3/ Operazioni dì memoria l Tali 
operazioni agiscono su qualsiasi 
registro di memoria o di dati. Es- 
se sono: 

* cancellazione dei dieci registri; 

* cancellazione di un solo regi- 
stro; 

* trasferimento di A in un regi- 
stro; jj 

* trasferimento di un registro in 
A; 

* scambio dei valori tra À ed un 
registro. 

Le seguenti possibilità lascia- 
no il risultato nel registro di me- 
moria specificato: 
a/ registro + A; 
b/ registro - A; 
c / registro * À; 
d/ registro / A. 

4/ Operazioni funzione. Sono di- 
sponibili due operazione funzio- 
ne: l’interesse composto e ram- 
ni or tamento. I dati per tali fun- 
zioni sono A, B e C. Il computo 


si riferisce a dieci periodi che 
vengono visualizzati nei dieci re - 1 
gistri di memoria* Premendo un 



tasto è possibile ottenere il suc- 
cessivo blocco di dieci periodi, 

5/ Operazioni di stah Esse con- 
sentono il movimento o la can- 
cellazione dei registri-dati: 

• rotazione in alto ; 

• rotazione in basso; 

• scambio tra A e B; 

• cancellazione di A; 

• cancellazione dei quattro regi- 
stri* 

Precisione ottenibile 

E ? possibile stabilire il numero 
di cifre decimali da visualizzare* 
Tutti i calcoli vengono però sem- 
pre effettuati tenendo conto del 
massimo numero di cifre che il 
Vie può trattare* L’approssima- 
zione è automatica; per esempio 
il valore 9,987 diventa 9.99 se si 
desidera visualizzare due sole ci- 
fre. 

Il Vicalc é utile per chiunque 
inizi a lavorare col Vie e per colo- 
ro che non dispongono di calco- 
latrici sofisticate* 
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Commodore ha introdotto in 
Italia i primi “personal computer”. 
Ed ora è dappertutto: in quasi 500 
punti di vendita. 

Questo significa disporre di una 
organizzazione capillare. Ma anche 


professionale. Ed efficiente. In grado 
di proporre sistemi conosciuti in 
tutto il mondo per il miglior rapporto 
prezzo-prestazioni. 

Commodore Computer è prima in 
Europa. E in Italia. Sei in buone mani. 
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è vicina. 


I Commodore Italiana Srl “ — — — 

\ Via FJIi Gradii, 4fi -20092 Cimsello Balsamo (MI) 

I Tel. 02/6125651 

■ ^ 

1 Richiesta di informazione £ 

I ^ 


nome 


I 

| indirizzo 


fs Commodore 

v COMPUTER 



I NUOVI PROGRAMMI PER IL W t Il ® 
DELLA UNITED MICRO W ARE INDUSTRIES INC. 


VHM01N VICALC 

Un comodo programmo dì calcolo l suo: 10 registri di me- 
morie: e 4 di doli sullo stock sono costantemente visualizzali 
sullo schei mo Premendo un singolo tasto, potrete ottenere i 
risalitati di i unzioni aritmetiche e matematich e, percentuali, 
numeri casuali, interessi composti e cosi via. Questi risultati 
possono essere immagazzinali in qualunque registro di me- 
moria. La precisione può essere scelto tra 0 e 9 cifre ssq ridi- 
co ti ve. Lit. 36.000 ► IVA 18%. 

VUM02N ALIEN BLITZ 

Un gioco d'azione in cui dovrete liberare il cielo da invasori 
alieni. Richiede riflessi prontissimi, special [niente ai livelli 
superióri di difficoltà Comprende diversi «special?» per chi 
raggiunge alti punteggi o colpisce determinati obiettivi. 
Joystick. Lit. 60. 000 - 18%. 

VUM04N THE ALIEN SK WITH JOYSTICK 

Questa volta l'alieno siete voi, e dovrete difendervi, con 
trappole aeree gonfiabili ed altri espedienti, degli abitanti 
di Crifter City che cercano di annientarvi. Azione rapidissi- 
ma ed effetti sonori. Espansione 3K Lit 60 000 - IVA 18% 

VUM06N 3-D MAZE 

Dovrete trovare lo vostra strada attraverso le pareti e ci i cor- 
ridoi di un intricalo labirinto. I vari passaggi si aprono reali- 
Eiicamenie ci vostri gechi mentre corcale aflannosamente 
una vie d'uscita. Vi sn tratterrà per ore od are. Lsl. 36.000 \ 

IVA 18%' 

VUM09N VICAT 

Il vostro data base personale questo programmo può gesti- 
re elenchi dì nomi, indirizzi,, numeri telefonici, ricetto e mol- 
te altre cose. [ records possono essere modificali, alfabeti^ 


za ti, registrali o prelevati da nastro. Virat e particolarmente 
polente quando i suoi primi liìcs vengono usati come dire- 
ctenes Ciascuno dei Mes [45 linee con 17 caratteri per li- 
nea J possono essere analizzali con una rapida I unzione di 
ricerca. Espansione 3K o 8K. Lit. 60.000 + IVA 18%. 

VUM10N AMOK 

I corridói di Arnok sono popolati da rt) bota la cui sola finalità 
consiste ne IL annientare i visitatori indesiderati. Per salvar- 
vi, dovrete prendere decisioni rapide e muovervi veloce- 
mente. I molti livelli di difficoltà di questo gioco vi daranno 
ore di divertimento, joystick Lit. 60.000 » [VA 18% 

VXJMl IN VITERM A 

Un programma che vi consentirà di connettervi telefonica- 
mente con reti di comunicazione e di trasformare il vostro 
Vie in un terminalo di computerà piu grandi Richiede un 
modem con interfaccia RS- 232 Lit. 48.000 IVA 18% 

VUM12N VI CHECK 

Un programma per gestire la vostra contabilità bancaria, 
compresi assegni, depositi e tutte le normali operazioni 
Funzioni di controllo, di ricerca rapida, di aggiorna mente -e 
perfino di stampa assegni Espansione 3K oftK., Lit. 60 000 - 
IVA 18%. 

VUM 12 N SUB CHASE 

Uno flotte di sommergibili sgancio morteli mine ad immer- 
sione Per distruggerle, dovrete piazzare ai posto giusto del- 
le barriere di bombe di protendile. Piu riuscirete a distrug- 
gerne, tuttavia, più L allocco nemico si farò serrato! Espan- 
sione BK Là. 60.000 + IVA 18% 


RICHIEDETELI AL VOSTRO RIVENDITORE O DIRETTAMENTE A 

U bits & bytes tutto il software che volete 


bits & bytes 201 24 Milano 
Via Monte Groppa n. 4 Tel. 02/573344-546890 1-651623 



Segni grafici 
col Vie 


IL VIC # come altri computer del- 
la Commodore, offre una vasta 
scelta di caratteri grafici facili da 
gestire attraverso la tastiera per 
gli usi più disparati. D*altra parte 
il limitato numero di linee (23) e 
di colonne (21) impedisce di oh 
tenere effetti grafici notevoli da- 
to che la quantità di caratteri vi- 
sualizzabili e 506 (- 22*23). 

E" però possibile aumentare 
enormemente le capacità grafiche 
dello schermo ricorrendo a carat- 
teri programmati dalFutente. Col 
Vie è possìbile definire caratteri 
greci, cirillici, geroglifici egiziani, 
ideogrammi giapponesi e addirit- 
tura piccoli disegni come Falieno 
riportato in queste pagine. 

L'utilizzatore, tenendo conto 
che ciascun carattere è formato 
da una matrice di punti del for- 
mato 8*8 (= 64), ha la possibilità 
di gestire ciascuno dei 506*64 = 
32384 punti visualizzabili sullo 
schermo. Il trucco consiste nel 
modo in cui il Vie utilizza la lo- 
cazione il cui indirizzo è 36869. 


Modo dì operare standard 


FIG. 1 — Set di caratteri standard 


Locazioni a partire dafla 32768: i primi 
due caratteri ed i relativi modi di 
rappreientazione. 

Carattere 


Locarono 

marne 

32763 

28 

32769 

34 

32770 

74 

37771 

6S 

37772 

76 

32773 

32 

32774 

30 

3277! 

0 

32776 

24 

32777 

36 

32770 

66 

32779 

126 

32780 

66 

32781 

66 

32782 

■ 66 

32737 

0 


Forma binaria 

0 | 0 |c'| I \ t | 0 1 0 

jOJ 

_0_ j0_ _0_ J_ _0_ _0_ 

0 < 0 J 0 I io 

0 1 0 ! 0 I I 0 IT 

0 0. I 0 0 0 0 0 
0 0 0 1 I l io 
jO _o_ o__o_ _0_ 

o I o I o h 1 1 1 o I o | o 

0 Q I OH) I 0 0 
0 I 0 0 0 0 I 0 

~o \ i T i T i o 

0 I 0 0 0 0 I 0 
0 I 0 0 0 0 I 0 

IT, i ,7 o "olTTir 
777 o|oT77 


FfG. 2. — Le fini di formazione dWa 

figura d'ai tene 
Figura 
desiderata 


Sua rappr» 
binaria 


_0_j_0 I 
J l_ ì_2_ 

i 

To_ ' i 

0 I 0 I 0 


l i o 
_o i _o_ 
s V 1 i 
_M 0 J_ 

i 0 f 

0 77 


Q 1 1 0 0 0 0 1 0 
0 0 II ooTo 0 


visualizzato 




Numero 

decimi** 

126 

90 

255 

169 

36 

66 

36 


L’indirizzo 36869 è il quinto 
di 15 registri che il Vie utilizza 


per il controllo della visualizza- 
zione e dei suoni. Tale registro, 
chiamato R5 nei manuali del 


computer, viene utilizzato per 
due scopi; anzitutto* determina 
Farea della memoria che sarà de- 
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5° SALONE 



FIERA DI MILANO CAMPIONARIA INTERNAZIONALE 

INGRESSI P.zza SEI FEBBRAIO 


Una grande vetrina di prodotti ed attrezzature per it “bricolage” 
Data la larga partecipazione Internazionale il Salone off re 
una eccezionale occasione di interscambio e di verifica trà 
Produttori, Commercianti e Consumatori 
Un mezzo sicuro per entrare ed affermarsi nel 
mercato mondiale del “do it yourself” 


■ - ORE t4 


Per informazioni ed iscrizioni: SEGRETERIA SALONE PÀI DA TE - 
Via Verona, 9 - 20135 MILANO - Telefoni 02/5463998 - 5488047 




dicata allo schermo (in altre pa- 
role determina l'indirizzo di par- 
tenza delle 506 locazioni di me- 
moria che rappresentano, caratte- 
re per carattere, le 506 celle del 
video); in secondo luogo R 5 im- 
pone ai Vie di rintracciare Ja zo- 
na della memoria in cui è deposi- 
tato il codice che stabilisce quale 
carattere far apparire sullo scher- 
mo in corrispondenza dei vari 
PRINT CHR$ e simili. 


Lifting 1 

18 REM *** PROGRAMMA M. 1 *** 

28 REM *** 

30 DATA 126.. 90, 255, 139, 139, 36,66,36 

40 FORA = 7163 TU 7175 

58 READ S 

60 POKE A, 3 

70 NE, -IT 

80 POKE 36363,255 

READY. 



Nei modelli Vie da 3.5K il va- 


Urting 2 

iore di R5 6 normalmente posto 


10 REM PROGRAMMA N.2 **:# 

; a 240: PRINTPEEK (36869) ri- 


20 REM stssk* 

sponde co! valore 240. 


I 30 DATA 126,90,255, 189, 189,36,66,36 

Non appena si accende il Vie, 


40 DATA 1 26 , 90 > 255 , 1 89 ,189. 36 ,66. 129 

la mappa dello schermo è coiti- 


5y FORA = 7163 IO 7183 ; READ 8 

, presa tra l’indirizzo 7680 e 8186 


6Ù POKER, cN NEXT 

70 + ORA = 7168 +32*8 T0 7162 +82*8+7 

(« 7680 + 506), mentre i caratte- 


30 POKER , S NEXT 

ri che devono essere presi come 


90 POKE 36869, 255 

riferimento per la stampa sul vi- 


100 PRINT"")" 

deo* sono allocati in ROM a parti- 


nei P0f£E?S8® .0 

re dall'indirizzo 32768. Per esem- 


1 20 PO RT=1TO100: NEXT 

pio l’istruzione: POKE 7680.0 


130 POKE7680, 1 

1 40 PQP T= 1 T n 1 00 : HFXT 

scriverà sullo schermo, nella posi- 


150 GOTO HO 

zione 7680 (prima posizione in 
alto a sinistra) ciò che nella map- 
pa dei caratteri in ROM, a partire 


GEF0V, 



da 32768, corrisponde aì valore 0 


Lifting a 

e cioè: 


10 REM *** PROGRAMMA N.3 *** 

Naturalmente la # non sarà 


20 REM ***' *** 

visibile tino a che, nella corri- 


38 DATA 126, 90, 255, 1 89 , 1 39 , 36 , 66 . 36 

spendente posizione della mappa 


40 FORA = 7163 T0 7175 : READ? 

del colore delio schermo (loca- 


50 POKER, 8 : NEXT 

rione 38400), sarà contenuto un 


60 P0KE36S69, 255 

■ 

codice colore che distingua il ca- 


Hjfi'H — 7680 TQ 76S6+S0S 

80 POKER ■ 6 

ratiere dallo sfondo , D comando 


90 POKER+30728, 6 i 

POKE 38400,6 sarà sufficiente 


100 NEXT 

per evidenziare là In maniera 


110 'POKE? 175 , 129 

analoga POKE 7680,1 visualizzo- 


1 20 FORT = 1 T 0 1 00 : NEXT 

rà, sempre in alto a sinistra, il ca- 


130 POKE? 175, 36 

ratiere À. Ciascuno dei caratteri 


1 40 FORT* 1 T0 1 06 NEXT 

150 GOTQ110 

READY, 

è definito dal gruppo di otto 
byte consecutivi da rintracciare 
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nella tavola dei caratteri» Le due 
illustrazioni riportate, rifere ntisi 
ai caratteri @ ed A, illustrano me- 
glio quanto detto finora. Si tenga 
solo presente che i numeri sono 
inseriti sotto forma binaria e che 
l'insieme di UNO e ZERO pre- 
senti in ciascun byte è interpreta- 
to dal computer come Fimmagi- 
ne da visualizzare: lo zero corri- 
sponde ad un puntino (pixel) del 
colore dello sfondo, mentre un uno 
corrisponde ad un pixel del colo- 
re specificato dalla mappa dei co* 
lori. Secondo tale ragionamento 
i numeri 28, 34, 74, 86, 76, 32, 
30 e 0, cioè i primi otto numeri 
della tavola a partire dalFindiriz- 
zo 32768, definiscono l'immagi- 
ne di €u 

Cambio della mappa dei caratteri 

L'area della memoria alla qua- 
le il Vie fa riferimento per la vi- 
sualizzazione dei caratteri può es- 
sere alterata mediante lo state- 
mene POKE riferito a R5. Ad 
esempio POKE 36869,255 farà 
prendere al Vie, come riferimen- 
to per la tavola dei caratteri, le 
locazioni di memoria dalTindiriz- I 
zo 7168 anziché da 32768. 

Poiché 7168 è un'area di me- 
moria RAM, essa può essere mo- 
dificata a nostro piacimento» Si 
tenga presente che la mappa del- 
lo schermo rimane inalterata (il 
primo carattere in alto a sinistra 
corrisponde alla locazione 7680), 

Tenendo presente quanto det- 
to possiamo ora inserire, ad 
esempio mediante POKE, gruppi 
di otto numeri per ciascun carat- 
tere che vogliamo introdurre. Si 


FIO. 3 — Taball# if*H* locazioni 
d'ini ilo d*i carfttftri 


Valori d«f Locatoti* 


registro 5 

Decimai# 

N,rc pagina 

225 

7618 

28 

j 254 

6144 

24 

253 

S12G 

20 

252 

4096 

16 


prenda come esempio la figura 
dei]’ alleno alla quale in seguito ci 
riferiremo» Il numero binario de- 
ve essere convertito nel corri- 
spondente decimale che può esse- 
re introdotto nella nuova tavola 

f 

dei caratteri mediante il program- 
ma N.l. Quando questo vicn fat- 
to girare, tutti i caratteri dello 
schermo cambieranno in modo 
casuale. Se però premiamo il ta- 
sto @ apparirà il piccolo alieno» 
Punico carattere, cioè, che abbia- 
mo definito col programmino. 
Analogamente con POKE 
38400,6: POKE 7680,0 otterre- 
mo un piccolo alieno in alto a 
sinistra. Per ripristinare il norma- 
le set di caratteri contenuto nelle 
ROM del Vie 6 sufficiente digita- 
re: POKE 32869,240 oppure, più 
semplicemente, i tasti RUN /- 
STOP e RESTORE contempora- 
neamente. 

Animazione 

Un modo semplice per realiz- 
zare un'animazione è quello di al- 
ternare due o più caratteri pro- 
grammati nella stessa posizione 
di schermo. E' utile provare, a ta- 
le scopo, il programma N.2 


Il programma N. 3 consente 
di riempire Io schermo di 506 
alieni che si muovono. Quest’ulti- 
mo listato riempe di blu la map- 
pa dei colori (7680 + 30720 = 
38400). 

Caratteri consueti in 
aggiunta ai nuovi 

In alcuni casi si presenta la ne- 
cessità di utilizzare gran parte dei 
caratteri residenti in ROM e di 
introdurre solo pochi nuovi ca- 
ratteri che sostituiscono altret- 
tanti caratteri della vecchia map- 
pa. Un modo semplice di risolve- 
re il problema è quello di ricopia- 
re, mediante POKEX, PEEK (Y) 

1 caratteri standard (valori di Y 
da 32768 in poi) nelle locazioni 
X da 7168 in poi e di sostituire 
in seguito solo quelli che interes- 
sano. 

Nella tabella prima riportata 
sono evidenziati i valori da attri- 
buire ad R5 (36869) per allocare 
i nuovi caratteri nei vari blocchi 
RAM. 

Per evitare malfunzionamenti 
è consigliabile collocare la mappa 
dei nuovi caratteri nella parte più 
aita della memoria RAM a dispo- 
sizione e di proteggerla alterando, 
i valori del top di memoria. Ciò è 
possibile mediante POKE5J t X e 
POKE 52,Y ove X (parte bassa 
delFindifizzo) ed Y (parte alta) 
rappresentano i valori da inserire 
per determinare la quantità di 
memoria RAM di cui il Vie può 
disporre per i programmi Basic. 

Nei casi ora visti, e cioè per 
un Vie da 3,5 K s un POKF; 52,28 
sarà sufficiente allo scopo. 
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Mapvol 


HO provato il programma “Map- 
vol” apparso sul numero 1 della 
Rivista e J’ho trovato interessante 
ed utile* Per questo motivo hó 

pensato ad una aggiunta di una 
routine di stampa ed ad alcune 
modifiche che lo rendono più co- 
modo. 

L 3 ot iginario programma 
“Mapvol” non 6 stato cambiato. 
Ho aggiunto solo queste modifi- 
che; 

1/ subroutine di centratura riga 
su monitor (da 2000 a 2060} per 
ottenere una migliore im pagina- 
zione; 

2/ lettura del nome del disco (li- 
nee 320-330) allo scopo di non 
avere diagrammi anonimi; 

3/ scelta fra diagramma visualiz- 
zato c diagramma stampato (li- 
nee 220-230); 

4/ menù alla fine di ogni opera- 
zione che si propone dopo la vi- 
sualizzazione del diagramma me- 
diante la pressione dì un qualsiasi 
tasto (linee da 680 a 770). 

Veniamo alla routine dì stam- 
pa (linee da 810 a 1110}* Per ave- 


re la possibilità della ristampa, 
mediante le istruzioni di cui alla 
linea 670 t il computer legge la 

memoria di schermo e carica i ri- 
spettivi dati nelle locazioni di 
memoria RAM comprese fra l’in- 
dirizzo decimale 8000 e Vindiiìz- 
zo decimale 8999. 


ÀI momento di stampare vie- 
ne letta la porzione di memoria 
fra 8000 e 8999 a scaglioni di 40 
caratteri; i valori letti, vengono 
tradotti m caratteri stampabili 
dalla stampante (con istruzioni 
per il passaggio dalla stampa in 
positivo o negativo e viceversa). 


+++++ 


MAPPA DISCO DRIVE 0 

2@ ++++++++++++++ ++3§8$g§888gi^ 

1 9 ++++++++++++++++++++++++ 

is ++++++++++++++++j^h*+++++m^^ì^i^ 

1 4 ++++++++ ++++++++IJ+++++++++++++++++ + 

1 2 ++++++++++++++++fflf+++++++++++++++++ 

1 1 ++ + 4 " +++++++++++ + 53 +++ ++++ ++++ ++++"!' + + 


9- +++++++++++++++++++++++++++++++++++ 
7 ++++++++++++++++++++++++++++++■+++++ 


1 ++++++++++++++++JSJ+++++++++++++++++ 

lì 1 1 I 1 1 1 1 12222222222333333 
1 234567890 1 234567890 1 234567890 1 2345 


2 REM 

11 REM 

12 REM 

21 REM 

27 REM 

28 REM 
23 REM 

30 REM 

31 REM 

32 REM 


PROGRAMMA < MAPV0L> CON ROUTINE DI STAMPA 

*** UNITA" CENTRALE * CBM 3032. UNITA" A DISCHI: CBM 3040 
*** STAMPANTE: CBM 3022 

m* NOMENCLATURA VARIABILI AGGIUNTE m* 

A$=VRRIABIL£ DI SERVIZIO 
COSTRINGA TITOLO DISCO 
RG$=VfiRI ABILE DI SERVIZIO PER TESTI 
RG=LENCRG$> 

SEGNALATORE DI "REVERSE 11 
J t ^SEGNALATORE DI STAMPA 
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significa .... 


....Oltre 4 anni di esperienza nell'inserimento di Personal 
Computer Commodore nelle aziende piccole e medie 
.... Oltre 1500 Personal Computer Commodore venduti tramite 
concessionari nelle sole Emilia - Romagna e Marche 
.... Oltre 40 concessionari esperti nell’uso dei computer Com- 
modore per usi gestionali, scientifici, hobbistici, controllo di 
processo 

....22 tecnici hardware e software di supporto ai concessionari 
.... Applicazioni speciali e di comunicazione sia tra elaboratori 
Commodore che con elaboratori di altre marche. 



significa anche .... 


.... Floppy - disk a 8" compatibili IBM 3740 anche multiuten- 

te *, (da 1 a 12 posti di lavoro). 

....Winchester da 10, 20, 40, 80 MB per Commodore anche 
multiutente *{da 1 a 12 posti di lavoro). 


*Multiutente significa che fino a 
12 elaboratori Commodore pos- 
sono essere collegati contem- 
poraneamente tramite IEEE - 
4888 ed accedere contempora- 
neamente ai dati o programmi. 
Così ogni computer Commodo- 
re può eseguire un programma 
diverso. 



S.H.R. S.r.l distributore esclusivo Emilia Romagna e Marche e R.S.M 

Via Faentina, 175/A - Centro Commerciale M.I.R. 

Tel. 0544/463200 (4 linee r.a.) - Telex 551050 SHR I 


33 REM J2=SEGNRLAT0RE HI RIPETIZIONE 

41 REM *** PROGRAMMO < MflPVOL > ORICI NfiLE *** 

210 PRINT'T]" : RGt=" RflPPRESENTRZIOHE GRfiFICR <BRM> fi" = PRINT" : GOSUB20Ì0 

220 PRINT “ WKBffiM" :RG$="E' RIGHI ESTfi Uh STRMPfi ? " : GOSUB20 10= PRINT 

230 RG$=" S/N " = GOSUB201 0 

240 GETR$: IFfìf= ,, 3"THEHJl = l : COTONO 

250 IFA$O"N"THEN240 


260 INPUT" tiPBiiMtt PPEiR I VE 0 !■■■■■}" : H$ 

270 IFD*= M 0"ORB$=" 1 "THEN290 
280 PR I NT " Ti" ;• ■ GOTO260 
290 OPEN 15,0. 15 

300 PRINT#15j "I"D*:NU*»CHR*<166) :Z4«1 
310 0PEN2 j8j. 2.. "#" 

320 PRINT#15, "U1 : ";2;D$; 18;0-PRIHT#15, "B-P";2; 144 
330 C$=" “ : FORI=1TO20 : GET #2 > R$ : Ct=C^+R* : NEXT 
340 V$= " 1 1 

350 

368 BEFFNS<Z)-2 t<S-INT<S/8>#8)AND<SB< INT <S/S) ;■ ) 

378 PRINT#15 J ,, B-P ,, ;2;l 
380 PRINT":]"; 

390 V=23 = X=1 : GGSUE780 

480 FORI=0TO20- PRINT: PRINT'UTT'RIGHT$<STR$< I>+" '\3>; :NEXTI 
41U GET #2 j R# : GET #2.. Ri : GET# 2, ft$ 

428 TS=8 

439 FGRT=1T035 

440 GET#2/ SC$ : SC=ASC(RIGHT$ <CHRT03>+SC$, 1 > ) 

450 TS— TS+SC 

460 F0RSN=GT02 

470 GET#2, fi* : IFfi*=" " THENfì*=CHR$< 0> 

480 SB<SN>=fiSC<fi*> 

490 NEXTSN 

580 V=24 : v=T+3 ■ GOSUB780 

510 PRINTLEFT$<RIGHT$<3TR$<T>,2>, 1 >")BrRIGHT$<STR*(T>, 1>: "irm"; 

528 FORS=0TO20 
530 IFK18THEN570 

548 IFT>30RHIiS= 1 7THENPRINTNU* ; ; G0T06 1 8 

550 I FT>£4RHDS= 1 8THENPR I NTNU$ ; : G0T06 1 0 

568 I FT>24ANDS=»1 9THENPR I NTNU* ; : G0T06 1 0 

578 I FT> 1 7RNLS=20THENPR I NTNU* ; : Z4=Z4+ 1 : G0T06 1 0 

588 PRINT" d"; 

590 I FFNS •; S ; =0THENPR I NT " + " ; : G0TG6 1 0 
608 PRINT"fi<-"; 

610 PRINT" FIB", 

620 NEXTS t T 

638 PRIHT#15j "I "+D$ 

640 PRI NT " aiflPPfi DISCO d"C*"S DRIVE "li* 

650 IFJ1THENJ1—0 : GGSUB670 : G0T081 8 

660 IFJ2THEN690 

661 GOSUB670 : GOTO680 

662 REM 

663 REM 

665 REM LEGGE Lfl MEMORIA HI SCHERMO E NE IMMAGAZZINA IL CONTENUTO 
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ABA ELETTRONICA non si limita a trattare la piu 
ampia gamma di marche e di modelli per tutte le ap- 
plicazioni, da quelle hobbistiche alle gestionali. 
ABA ELETTRONICA mette a vostra disposizione il 
mondo della microinformatica, dai corsi di istruzio- 
ne a vari livelli, all'assistenza tecnica più qualificata, 
alla vendita di periferiche, accessori e pubblicazioni. 
Vi aiuta a scegliere inoltre. Nella sua saia di dimo- 
strazione è possibile provare e confrontare quanto 
di meglio offre oggi il mercato. E quando avrete 


deciso per un nmcrocomputer, ABA ELETTRONICA 
vi propone di scegliere la forma di acquisto che pre- 
ferite, Anche in leasing o per corrispondenza. 

Infine ABA ELETTRONICA vi fornisce tutti ì pro- 
grammi, standard o su misura, siano essi gestio- 
nali, professionali o scientifici che Vi necessitano 
provvedendo anche aiTaddestramento dell’opera- 
tore sul sistema che avete scelto e su tutta la mt- 
croinformatica che lo riguarda. 

Chiavi in mano. 


Desidero ricevere I 
informazioni sui seguenli | 
Vs. prodotti e servizi: 


Nc?mo 


\\\\\V/// ELETTRONICA 

Il centro più completo 


Cognome 


a memoria di computer 

Vendita, Programmazione e Assistenza; 

ABA ELETTRONICA * 10141 Torino - Via Fossati Sic 
Tei. {01 1} 33 20 65/33.93.28 


Città 


Telefono 













NELL' AREA R.A.M. COMPRESA ERA 8808 E 8999 


666 REM ##* 

668 REM 

669 REM 

670 F0RI=6T0999 ■ POKE8000+I , PEEK<32768+I > : NEXT : J2=l : RETURN 

671 REM 

672 REM 

673 REM 

680 GETfi$= IFfl$=“ "THEN680 

693 PR I NT " rWtìKKDSBfl 31 ■ ALTRO CICLO" = PRINT "MT 

700 PRINT" 329 DIRECTORY" = FRI NT "SM" 

710 PRINT" 339 RISTAMPA" :PRINT“W 

720 PRINT" 349 FINE PROGRAMMA " 

730 GETRf : I FA$= " 1 " THENRUH 

748 I FRf = " 2" THENPR I NT ” 3NUMD I RECTORV li " B$ " ? i" : POKE 158,1= POKE623 , 1 3 = END 
750 IFfì$= " 3“THEN0PEN4 , 4 = GOTO820 
760 I FR$<> " 4 "THEN730 
770 PR I NT " 71" = END 

7S0 PR I NTLEFT* C V$ , V ) L.EFT$ < X$ , X > "II" ; 

790 RETURN 

301 REM *** LEGGE DA 8000 A 8999 E STAMPA I RELATIVI CARATTERI 
810 0PEH4 , 4 

320 PR INT#4 = PRINT#4, TRE <20 > ; = FORfi=0TO24 = B$=" " = E=8000+48*A 
830 POR I =0 T039 = C=B+ 1 

349 IFPEEK <C> <=63THENG0SUE 1 ©00 = NEXT = GOTO 9 So 

35© I FPEEK C C ) >=64ANDPEEK < C > <- 1 26THENG03UB i 020 = NEXT = GOTO900 

860 IFPEEK < C > = 1 27THENG0SUB 1040 = NEXT = GOT 0900 

370 IFPEEK < C > >= 1 92ANDPEEK < C > C255THENG0SUE 1 860 = NEXT = GOTO900 

388 IFPEEK <0 -255THENG0SUB 1080 = NEXT ■ GOTO900 

390 I FPEEK <C;>=Ì 28ANDPEEK< C > < 1 92THEMG0SUB1 1 00 = NEXT 

90@ PRINT#4 = PRINT#4, TAB<28>; =HEXT = FRI NT# 4, "II" = PRINT#4, "M" 

910 = CL0SE4 = IFJ2THEN690 
920 G0T068S 

1000 I F JTHEN J=8 = PR I NT#4 , CHR$ < 1 46 > 

1010 PRINT#4,CHR$<PEEK(C)+64:jj = RETURN 
1020 IF JTHEN J=0 = PRINT# 4, CHR$ < 146> ; 

1038 PR I NT#4 , CHR$ < PEEK < C >+ 1 2S> J = RETURN 
1 940 I F JTHEN J=© ^ PR INT#4 , CHR$ <146) ; 

1050 PRINT#4,CHR*a31>; = RETURN 
1060 IFJ=0THENJ“1 =PRINT#4,CHR$<13>; 

1070 PRINT#4, CHR$ (PEEKCO > ; = RETURN 
1038 IFJ=8THENJ=1 =PRINT#4, CHR*< 18> ; 

1090 PR I N T#4 , CHR4= <191);= RETURN 
1100 IFJ=0THENJ=1 =PRINT#4,CHR*=<18>.: 

1110 PRINT#4, CMR$(PEEK<C>-64> ; = RETURN 

2001 REM *** CENTRATURA RIGA SU MONITOR DA 48 COLONNE *#* 

2010 RG=LEN<RG$> = IFRGX2=INT<LEN<RG$>/2)THEN2050 
2020 I FRG=0THEN2050 

203© I FM I D$ < RG$ .* RG, 1 >OCHR$<32)THENRGMRG-l = GOTO2020 
2040 RG$=MID$<RG$, 1,RG>+MIB*<RGÌ=, RG> 

2050 PRINTTAB< INT ( < 40-LEN < RGf ) >/2) >RG* 

2060 RETURN 



Commodore Italiana srl 

Via F. Eli Gracchi, 48 
20092 Cinisello Balsami (MI) 
Tel. 02/6125651 

Distribuì ori Commodore: 


Liguria - Pirìsi Informatica 

Piazza Cavour, 19 * 16CI43 Chiavati 
TeL 0185/30.10,31 

Piemonte - Abs Elettronica di Caramta 

Via Fossati, 5/C - 1 01 4i Torino 
Tel. 0J 1/33.20,65 

Lombardia - Homi* Personal Computer» srl 

Piazza de Angeli, 3-20146 Milano 
Tel. (12/49.88.201 

Veneto, Friuli-Venezia Giulia. 

Trentino- Alto Adige 
CthR'EL» Italiana Udine 

Via Mercatovecchio, 28 - 33100 Udine 
Tel. 0432/29. 14.66 

Emilia- Romagna» Marche - S, IL R, srl 

Via Faentina 175/ A 

48010 Fornace Zurattìm (Ravenna) 

Tel. 0544/46.32.00 

Toscana - M.C.S. Spa 

Via Pier Capponi. 87 - 50132 Firenze 
Tel. 055/57, 13,80 

Umbria - Alto Lazio 
Alias System srl 

Via Guglielmo Marconi, 17 -01 100 Viterbo 
Tel. 0761/22.46, 88 

Lazio» Kiber Italia srl 

P.le Asia, 21 -00144 Roma Eur 
Tel. 06/59.16.438 

Abruzzo, Molise - Pragma System Sri -dÈm 

Via Tiburiina, 57 -65100 Pescara 
Tel. 085/50.883 

Campania - Grani Systems 
Elaboratori Gesti urtali 3HHÈfek 

Via P, Grisignano, 4 

84100 Salerno ; .. 

TeL 089/32.17,81 m 

Puglia * Macelli x Pufricio 

Via L, 2uppetta, 5 - 71100 Foggia 
Tel. 0881/76.1.11 

Business Àutomalion Systems srl 

Largo De Genimis, 46/B-46/C-48 -48/ A-4&/B 
70124 Bari -Tel. 080/22.75.75-22.73,44 

Calabria - Sirangelo Computerà srl 

Via N icola Parisio, 25 - 87100 Cosenza 
Tel. 0984/75. 7.41 

Sicilia - Edilcomput Progetti 
del ring. Giuseppe Carbone 

Via La Farina, MI Is. L - 98100 Messina 
Tel. 090/29,28,269 

Sardegna - S.l.L Sistemi Integrati Informatica 

Via S, Lucifero, 95 - 09100 Cagliari 
Tel, 070/66.37.46 


Il rinoceronte 
col joistick 


In riferimento al programma 
“Caccia al rinoceronte”, pubbli- 
cato sul primo numero, vorrei 
proporre alcune modifiche che 
permettono l'uso dei joystick pei 
eseguire i movimenti. 

Dette modifiche sono: 


1997 

1998 GOTO 1005 

1999 da cancellare 

5000 A= AD : IFJS=369THENM 
= l.:GOTO5100 
5010 1FJS=357THENM=2 : 
GOTO5100 >&- 


1000. ..suggerisco unlOKE 
36879,25 al posto dell’oppri- 
mente POKE36879.I0 
! 002 aggiungere : J 1 =3 7 1 3 7 : 
J2=37152: POK£37154,127 
3015 JS=PEEK (J1)+PEEK(J2) 
:IFJS=373THEN]015 
1997 iF PEEK(J1K>94THEN 


I Commodore Italiana Sri ” 
l Via F ili Gracchi, 48 
I 20092 Ci ni sello Balsamo (MI) 
1 Tel, 02/6125653 


I Richiesta di informazione 


nome 


indirizzo 
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Commodore Italia 


significa oggi circa 500 punti vendita. Dove trovi gente che la sa lunga sui 
computer, e sulle qualità dei vari computer. 

Per il “Commodoriano' 7 proporre Commodore è particolarmente 
gratificante: Commodore Computer è conosciuta in tutto il mondo pel- 
li miglio rapporto prezzo-prestazioni dei suoi sistemi, È conosciuta anche 
per la vasta gamma di soluzioni che propone: gamma alla quale nessun 
produttore di "personal” si può oggi avvicinare* 

Anche per questo Commodore è fra le prime tre aziende del mondo, 
prima in Europa. E prima in Italia. Quando conosci un { ‘Comniodoriano” 
fidati. Sei in buone mani, 


tV Commodore 

COMPUTER 



5020 IFJS=24THENM= 3 : 
G0TO5 1 00 

5030 IFJS=365THENM=4 : 
G0TO5 1 00 

5040 IFJS=353THENM=5 ; 
G0T05 1 00 

5050 IFJS=241THENM=6 : 
G0TO5 1 00 

5060 IFJS=349THENM=7 : 
GOTOS 1 00 

5070 IFJS-237THENM=8 

Ora con il joystick si possono 
effettuare tutti gii 8 movimenti 
che prima venivano eseguiti con i 
tasti funzione ed in più, con il 
PIRE BOTTON, si può riprende- 


re il gioco dopo la richiesta di 
“ANOTHER GOr 

Data la sensibilità di alcuni 
stìcks, per le posizioni intermedie 
(alto-sinistra, basso-destra, ecc.), 
è consigliabile portare lo stick 
nella posizione voluta prima che 
compaia la scritta “LA TUA 
MOSSA”, 

Approfitto della presente per 
segnalare un aggiornamento allo 
stesso programma, dovuto al fat- 
to che nella versione originale in 
alcune circostanze “i rinoceronti 
possono uscire dallo schermo”. 

Ed ecco le modifiche; 


1025 FORICI TO20;lFV (I) = 
0THEN101G 

8020 FORM=0TO8 :RM <M) = 
PEEK(FWA (X+FNX(M)) + (Y 
+FNY (M)> 

8022 IF(X=> 1 AND(M= 1 ORM = 
50RM=6)) OR (X=22AND (M 
=40RM> 6))THENRM (M)- 1 60 
8024 IF(Y =0AND(M=2ORM= 
50RM=>7)) OR (Y=21AND(M 
=60RM=30RM=8))IHEN RM 
(M)-lóU 
8026 NEXTM 

Filippo Po 2 Z i 

Vii XX Settembre, 30/B 
27063 Voghar» (PVJ 


900 NR=3 : 0-7680 : 00=30720 : 51=36874 : 53=51+1 : P0KES1+4, 10 : P0KE36879; 25 : DIf1R<20.. 2) , V< 
20 > 

1002 DEFFNfKX> -Q+22#X : BEFR4X( M ) = ( Pl= lQRf1s50RM = 6) _ ( M>6QRM"4 ) : JI =37137 = J2=37152 = P0K 
E37154» 127 

1003- DEFFNV(fi)-(l1=20RM=50RM»7)-<n=60RM=30R11=S> : GOSUB73B0 
1O05 GO3UB2000 

1010 HF=0 : V=YH : CH=46 ;0L=2 :FQK£138, 0 : PPINT" 

1811 FRJNFBS T0CCR R TE 

1015 JS=PEEK<37137)+FEEK;37152) : IFJS=373THEN1Q15 

1018 PRINT"# " - GOSUB5000 ; GOSUB6000 : RN=0 : XH=X : VH=Y : CH=34 : CL*2: 

IFU>0THEN1390 

1028 I FHFCHRTHENGO3UE700S 

1821 IFRN«8THENGDSUB8000:IFW^8THEN1970 

1024 IFRN=0THENi010 

1825 FQRI=1T028 : IFV<IJ=BTHEH1010 

1030 RD=0+22#R( I / 1 >+R< I j2) : P0KERB, 94 : FOKERE+CO>2 : HF=NF+1 : MENTI : D0TO1010 

1970 N=XH : fìD=FNfKH?+YH-l : POKEFìD > 26 ; PQKERD+1 r 15 : F0KERD+2 j 28 r POKER® +3; 33 : T=50 : C=0 

1372 FGRP=OT03 : P0KEflD+C0+P; C : MEX7P : C=£+(C=2) :P0KESM29+3#C:T=T-1 : 1FT>0THEN1972 

1374 POKESi, 0 : FRI NT? SS PRESO ! " : FCRT=0TQ2063 : ri EXT : GOTO 1996 

199S PRINT"*« SEI SALVO' " • GDSUB7300 : FORT=0TO2000 : NEXT : IFNR<20THENNR*N 

R+l 

1396 PRIHT'tìWFIRE* PER CONTINUARE" ; F0KE198/0 : U B 0 

1337 IFPEEK<J1)094THEN1997 

1338 GOT01005 

2080 PRIHT "51 CI SONO "HR "ALIENI" 

2810 F0RI-0+22TO0+433 = IFRNBC 1 ». 75THENP0KEI+C0 ■ 5 : P0KEI, 168 
2012 MENTI 

20 H F0RI-0+30TOO+1 1SSTEP22 : F0RJ- 1705 : PGKE 1+ J > 32 ; NEXT 3 > I 
2815 FORI =0+426TQQ+470STEP22 : FDRJ=1TQ5.PGKEI+J, 32 : NEXTJj I 
2018 POKEO+77.- 5 : FGKE0+77+C0, 2 : P0KE0+473, 46 ; PGKE0+473+C0, 2 
2860 FORC=1TONR 

2070 Y’INKRKB < 1 >*16+3) = X- INTERNE ( 1 >#8+8 > : R<C, 1 )=X : R( C, 2j =Y 
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2075 1 FPEEK ( FHFK X) + V ) ©32THEN207 0 

2680 NEXTC : FQRC=1TQ10 : V<C>=0 : NEXT : KH=21 : YH=1 1 ■ RETURN 

4538 

5000 R=M- IFJS=369THENM=LGOTCi5100 

5061 IFJS=337TNENM=2 : GOTQ510O 

5062 IFJ$=245THENM=3 : GOTG5100 
5003 IFJS=3G5THENM=4 : GOTO510® 

5604 IFJS*353THENM=5 : GGTO5100 
5085 IFJS=24 1 THENM=ó : GOTQ5190 

5006 IFJS=349THEHM=7 : G0TD3 100 

5007 IFJS=23?THENM=8 

5100 IF<X=lRNDCM=!QRH*5QRM=6))OR(X=22flND<N=4QRM>6)>THEN5110 

5102 IF< Y=0fiNIKM=2CRI1=50RM=7> )0RCV=21 RND <M=60RM=30(?M=e) >TH£H5l 1 6 
5104 FIIJ=FKFKX+FNX(M>)+Y+FNY(N) 

5166 T=PEEK(fiD> ; I FT032THENU=2 : IFTO8THEN5110 

5103 RETURN 

5110 flD=P : M=9 : W=0 ■ RETURN 
6000 RD=FNFKX>+Y : P0KERD/ 32 
6910 X=X+FNX(M) :V=V+FNVai> 

6020 RD=FMfi < X ) +V : POKEfìB .■ CH : PGKEflD+CO, CL : RETURN 
7000 FORl=NF+ITOHR : X=R< LI ) : Y=R< L2L IFV< I )=1THEN7069 
7010 N=RBS<X-XH) : IFN=0THENN=RBS(V-VH ) 

703O D^22*<XH<X)-22*(X<XH)+<VH<V)-<V<VH> 

7040 FORJ=lT0N:RD=FNR(X)+V+JNiD: IFPEEK(RB)=160THEN7060 
7050 NEKTJ : IFFEEK(fiI))=46THENRN=l :V(I)=1 :GQSUE710S 
7060 NEXTI •• 1=1 ; I FRN=9THENRE T URN 
7070 XF I =NR+ 1 T HENRE T URN 

7030 IFW I )=00RI~10RVCI-1 ^ÌTHENI^I+I : GOTO7070 
7090 VCI-Ì)=1 : VC1>=0 : SX=R<I-L 1) : R(I-L 1?=R<L 1> :R(L 1)=SX 
7095 SV=R<I-L2> R<I“'L2)=R(L2> :R<L2)=3V: 1=1-1 :GOTO7880 
7100 3=150 • B=S : GO3UB7200 : GQSUE7200 = S=130 : D=16 : GGTO72B0 
7200 P0KES2/ S : P0KE162, 0 : WfìlTl 62 , 2 : P0KES2, 0 : $=0 : RETURN 
7300 B=3 ^ 5=231 : GOSUB7200 : GOSUB720G : Q=G+1 : IFQ=3THEN7310 
7303 3=229 ■ : GQSUB7200 : GQSUB7200 : GOTO7500 

7310 Q*0 ^ S=223 : GOSU57200 : GOSUB7200 -3=228 : GOSUB7200 ■ GOSUB7200 : S=255 : GGSUB7200 : GOS 
UE7200 

7320 5=219 : n=32 : GOTG7200 

8000 FOR Ì=1 TQNR : X=R< L 1 > : V*R< I .. 2> : IFVC 1 >=0tHENRETURN 
8020 FORM=0TO8 : RM( M)=PEEK(FNfl < X+FNX < M ) > +V+FNV ( fi) ) 

8022 IF<X=lfiNBai=lGRH=5ORH=6)>OR<X=22fiHD(f1=4ORN>6>)THENRI1(m*160 
8024 IF< V=0RNB CN=2ORM=50RN=7? >OR ( V=2 1 RNIKM=6GRN=30RM=8 > )THENRM(M ) = 166 
8026 NEXTM 

8030 fl=3 : B=1 • C=6 = GGSUB9S00 : B=4 : C=8 : GCSUBS306 = R=2 : 0=7 ; GGSUB8S00 : E=L C=5 ; GOSUB6800 
8040 FORN=0TO8: IFRN<M)=46THENN=1 :GOTO600S 
£041 IFRMODO32THEN8044 

8042 RM<N ) =RBS CX-XH+FNX< M ) ) +RBS< V-VH+FNY<M) ) 

8044 NEXTN:MV=H0:«=0 

8646 FORJ=0TO8 : 1FRM< J><=NVTHENH=7 : MV=RHt J> 

8043 NEXTJ : GGSUB6000 : 1 FU>0THENRETURN 
8O30 R<L 1)=X : R<L2)=V ; NEXTI : RETURN 

8800 IFRM<R>=160RHIRNG>=160THENRN< 0=169 
3319 RETURN 
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Procedure programmi per i 

Sistemi completi (icommodore 

CBM serie 400018000 

sene 400018000 

Condomini e affitti 

Dischi rigidi 10M Bytes 

Laboratorio analisi mediche 

Interfaccia e schede 

Agenzie immobiliari 

grafiche per CBM ((Commodore 

Gestione bolle consegna 

Multex per collegare 3 o più 

Fatturazione 

Pet CBM ad un solo drive 

Gestione Maglifici • 

Compilatore PetSpeed e 

Compiled Integer Basic 
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3. Le operazioni 
aritmetiche 

Costanti e variabili 5 1 LET 1 = 1-1 


Opportunamente programmatoci vostro compu- 
ter può effettuare una grande varietà di calcoli. Ciò 
può essere fatto utilizzando le istruzioni di calcolo 
aritmetico i cui risultati vengono assegnati ad una 
posizione di memoria. Ad esempio: 

50 LET S = X + Y 

dice al VIC di aggiungere il contenuto della cella X 
a quello della celia Y.e di memorizzare il risultato 
in un’altra cella di memoria, la S. Naturalmente i 
valori di X e Y sono stati definiti in precedenza 
mediante un’istruzione INPUT o il tandem di istruì 
zioni READ + DATA, ovvero mediante un’altra 
LET. 

L’effetto di LET non modifica il contenuto del- 
le celle X e Y t Ad esempio* la tabella 3.1 mostra il 
contenuto di X ? Y ed S prima dell’esecuzione dei 
superiore LET in un programma che, oltre alla li- 
nea 50 precedente, contiene anche le seguenti istru- 
zioni: 

30 READ X, Y 

40 DATA 123,56 

Cella Prima Dopo 

X 123 123 

Y 56 56 

S ? 179 

Tabella 3,1 Contenuto di X* Y ed S 

Notate come sull’ originario contenuto di S (sco- 
nosciuto) è stato sovrascritto il nuovo valore 179, 
risultante dal valore 123 + 56* 

Le variabili situate nella parte destra del segno 
uguale di una istruzione LET possono sia dipendere 
da diversi operatori aritmetici sia essere costituiti 
anche da valori costanti. Un esempio. 


che sottrae 1 dall’attuale valore di I, sicché dopo 

l’esecuzione dell’istruzione LET I assume un nuovo 
valore inferiore di ì rispetto al precedente. Da no- 
tare che la parola LET può essere omessa. 

Le costanti numeriche utilizzabili sono: 
a/ numeri interi (in inglese mtegers) che non con- 
tengono punto deeimaie (gli angloamericani ed an- 
che i computer usano il punto al posto della nostra 
virgola decimale. Per gli inglesi la virgola serve a 
sapere le migliaia invece del nostro punto). Esem- 
pio: -45 ,360 C + 360) 

b / numeri contenenti un punto decimale (ftoatìng 
point \ in italiano virgola mobile, anche se il compu- 
ter usa il punto). 

cj Numeri elevati alla potenza, come 12.3E4 che 
rappresenta 12.3x104 = 123.000 {dove E sta per 
Esponente e 4 è l’esponente). L’esponente può an- 
che essere negativo come ad esempio in 12.3 E -4, 
che equivale a 12.3X10 4 = 0.00123. 

Notate che per fare assumere ad un numero un 
valore negativo è sufficiente premettergli il se- 
gno meno (-); il segno più (+) o l’assenza di un 
segno specifico indicano che il numero é positivo. 

Qualsiasi numero utilizzato in un programma, 
sìa che si tratti di una costante che del contenuto 
d’una variabile, deve essere contenuto nei limiti di 
capacità consentiti dal VIC e cioè ± 1,70141 183 E 
+ 38, ± 2,93873588 E -39 rispettivamente per il 
massimo ed il minimo numero. 

Operatori aritmetici 

ì simboli posti alla destra del segno uguale d’una 
istruzione LET possono essere nomi di variabili, 
costanti ed operatori aritmetici. Tale combinazione 
di simboli è detta espressione aritmetica .. Gli opera- 
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tori aritmetici indicano quali operazioni aritmeti- 
che vanno effettuate sui numeri delfespressione 
aritmetica. Il seguente elenco mostra in quale ordi- 
ne vengono svolte le varie operazioni a meno che la 
loro sequenza non venga modificata mediante fuso 
di parentesi, come vedremo nella prossima sezione. 
Opera tori ari tm etici Salificato 

f elaborazione a potenza 

(e spo nenzia zio ne) 

* # / moltiplicazione* divisione 

+ f - somma* sottrazione 

Gerarchia delie operazioni 

L’uso delle parentesi serve a modificare la se* 
quenza e la priorità delle operazioni da svolgere* Il 
contenuto delle parentesi va svolto a cominciare 
dalla coppia posta più all’interno, procedendo ver- 
so quelle più esterne. Ad esempio per calcolare 
5 + 9 
4 + 3 

è necessario calcolare prima la parte superiore ( nu- 
meratore), quindi quella inferiore (denominatore) 
ed infine dividere il numeratore per il denominato- 
re, Per indicare questa sequenza di operazioni si 
ricorre alla parentesi. 

Un programma che illustra questa sequenza di 
calcolo è illustrato nella tabella 3.2* Lo spazio mag- 
giore lasciato nella numerazione delle istruzioni 
LET e PRINT consente il successivo inserimento di 
altre istruzioni di cui potremmo avere bisogno, 

30 READ E.C.DiE 
40 DfìTR 5*9. 4.i 3 
56 LET R=<B+C)/<E+E> 

70 PRINT B;c;b,e.;r 
80 END 


LET della linea 50. Fate girare questo programma 
sul vostro computer, quindi modificate l'istruzione 
LET come segue (ossia eliminate le parentesi): 

50 LET À = B + C/D + E 

Otterrete 10.25 (cioè 9/4 +5 +3). Ciò perchè 
senza le parentesi il vostro computer svolgerà i vari 
calcoli secondo un suo certo ordine. In particolare 
eseguirà, per prima cosarle elevazioni a potenza (se 
ce n’è)* quindi le moltiplicazioni e/o le divisioni 
che va incontrando da sinistra verso destra* infine 
le addizioni e/o le moltiplicazioni procedendo sem- 
pre verso destra. 

Se osservate ancora l’ultima istruzione alla linea 

50 noterete che la divisione* C/D, è stata eseguita 
prima delle addizioni. Il risultato, dunque* sarà no- 
tevolmente diverso da quello calcolato con la pre- 
cedente istruzione LET della tabella 3,2 

Espressioni aritmetiche e istruzioni 

Inserite nel vostro programma le istruzioni LET 
e PRINT illustrate nella tabella 3.4 e fatelo girare. 

5@ LET R=CB+CVa<+E> 

51 LET GC/E-BW 
52 1 LET H=C:/<E~E>*D 
53 LET J=G-H/E+Et2 

61 LET 

62 LET T=CC*H-B> Tfì 

63 LET 

70 PRINT 

71 PRINT 

72 print"b= ,, ;B; H o rt ;C; "D=”; n; M E= ,f ;E 

73 PRINT 

74 PRINT 

75 PRINT "R=”;R; l, G= l, ;e; "J=" ; J 

76 PRINT 

77 PRINT 

78 FRI NT " S= 11 ; 5 ; rt ; T ; " u= 11 ; U 

30 END 

Tabella 3,4. Istruzioni LET 


Tarala 3.2 Programma per illustrare Bordine di calcolo 



Cella 

B 

c 

D 

E 

A 

Prima 

' '5 

9 

"4 

3 

9 

» 

Dopo 

5 

9 * 

4 

3 

1-2 

Tabella 3,3 






La tabella 3.3 illustra il contenuto delle celle di 
memoria prima e dopo l’esecuzione delPistruzione 


Visualizzate tutti i risultati (À, G, H, J, S, T* U) 
ed i nomi delle variabili come identificazione. I dati 
letti ed i risultati finali sono mostrati nella tabella 


3.5 

B «= 5 

C = 9 

D = 4 

E « 3 

A = 2 

G = -17 

H = -18 

11 

iL 

S = 11 

T = 961 

c 

II 

00 



Tabella 35. Dati letti e risultati finali 
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Note 

1 - La linea 51 potrebbe essere sostituita da 
5 1 LET G = (C/E) - (B *D) 

per ottenere io stesso risultato, anche se in questo 
caso le parentesi non sono necessarie. 

2 - Le parentesi della linea 52 sono obbligatorie per 
ottenere il risultato corretto, come si può vedere 
confrontando i risultati della linea 52 con quelli 
della 5 h 

3 - Nella linea 53, TH viene utilizzata nell’espressio- 
ne perchè gli è stato assegnato un valore nella 
precedente istruzione 52. Invece di E / 2, potete 
utilizzare E * E che, come operazione, è più veloce. 
Modificate ristruzione 53 in 

53 LET J « G - H/E + E * E 
e controllate che otteniate Io stesso risultato di L 

4 - Nella 61, B f À (cioè 5 2 ) viene calcolato per 
prima, poi si calcola C * D, (ossia 9x4) quindi la 
sottrazione ( 36-25 X Tuttavia, nella linea 62 il con- 
tenuto delle parentesi viene calcolato per primo, 
dopo di che ii risultato viene elevato alla potenza 
A. 

5 - Nell’istruzione 63 abbiamo tre paia di parentesi. 
Le più interne sono svolte per prime a cominciare 
da quella più a sinistra, cioè partendo da C-B (ugua- 
le 4), quindi D/A (uguale 2). L’elevazione a poten- 
za viene eseguita successivamente, ottenendo 4 2 
che alla fine viene moltiplicato per E (=3). 


51 LET 

52 LET H=C/<E-B*D> 

53 LET J = < l G-’ri > /E+ 1 > T2 

61 LET S=OKH‘-B)tfl 

62 LET T=C*KH~EtfD 
62 LET U-E*C-B-T1Vfì 


B = 5 C = 9 D-4 E = 3 

A « 2 G t -18 H * -.529412 J = 7.97232 

S = 9 T = -189 U = -285.5 

Tabella 3,7 Risultati di espressioni aritmetiche 


Problemi 

Ora siete pronti per affrontare alcuni semplici 
problemi. Per quelli più complessi è consigliabile 
esprimere la logica sotto forma di diagramma di 
flusso (in inglese flowchart), prima di codificarli in 
basic (v. capitolo 4). 

Nei vostri programmi, per i valori che durante 
l’esecuzione d’un programma, o tra un’esecuzione 
del programma ed un’altra, rimangono immutati, 
usate sempre delle costanti e non delle variabili. I 
nomi delle variabili dovrebbero essere significativi: 
ad esempio, usate S per Spese. 

Scrivete dei programmi per ciascuno dei proble- 
mi seguenti e fateli girare sul vostro VIC. Se com- 
mettete errori, la lettura del capitolo 4 vi aiuterà a 
correggerli. Confrontate i vostri programmi con 
quelli riportati in calce al presente capitolo; sosti- 
tuendo i valori reali al posto delle variabili potrete 
capire meglio l’effetto di ogni istruzione. 0 risulta- 
to di ciascun programma per i valori assegnati è 
esposto nelle tabelle 3.8 e 3.9. Per ottenere risultati 
diversi provate a modificare le istruzioni PRINT, ad 
esempio evidenziando la risposta con trattini o con 
asterischi. 

Problema 1. Quantità di lire occorenti 


Tabella 3,6 Espressioni aritmetiche modificate 


Come ultimo esercizio, modificate le espressioni 
aritmetiche delle linee 5 1-63 del listato 3,4 sosti- 
tuendole con quelle della tabella 3.6, Confrontate i 
risultati con quelli della tabella 3,7, Il vostro VIC vi 
dà la possibilità di cambiare i singoli caratteri di 
ogni istruzione; utilizzate questa facoltà invece di 
ridigitare tutta la linea di istruzioni. 


Per il vostro prossimo viaggio negli Usa vi occor- 
reranno 150 dollari per Talbeigo e 150 dollari per 
ristoranti, spostamenti e spese varie. Vi proponete 
di rimanere cinque notti e desiderate cambiare dol- 
lari a sufficienza in modo che ve ne rimangono 100 
per acquistare dei souvenir. Quante lire dovrete 
cambiare se il dollaro vale 1.400 lire? (D vostro 
programma deve essere abbastanza flessibile in mo- 
do da poter calcolare anche ì cambiamenti nel co- 
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sto e la durata del soggiorno e le fluttuazioni del 
dollaro. 


DURATA DEL SOGGIORNO; 

5 NOTTI 
ALBERGO: 

$150 PER NOTTE 
SPESE (PASTI, ETC*): 

$ 125 

VARIE (SOUVENIR): 

$ 100 
CAMBIO: 

0.71 ($ PER Lire 1000) 

LIRE OCCORRENTI (x 1000): 

1047,25 

Tabella 3,8 Risultato del programma “lire necessarie” 


Problema 2, Costo del materiale di cartoleria 

Calcolate il costo del materiale di cartoleria oc- 
corrente per un corso che dovete organizzare, date 


20 INPUT fLS,V,C,N 

25 PR1NT 

26 PRINT 

27 PRINT 11 DATA" J E*;" ";NS 

26 PRINT 

30 LET T=C(flS5*N+V>/C 

40 FRI NT "DURATA DEL SOGGIORNO" 

45 PRINT N; "NOTTI" 

50 PRINT "ALBERGO- " 

60 PR INI 11 SPESE < FAST LETC- ) : “ 

65 PRINT' 1 ♦ " ì S 

70 PRINT" VARIE (SOUVENIR) - " 

75 PRINT H $' r ;V 
80 PRINT "CAMBIO" 

85 PRINT C; n ($ PER 1000 LIRE) 1 * 

66 PRINT 

90 PRINT "LIRE OCCORRENTI <X 1,000) 
95 PRINT T 

100 PRINT "*####*#*" 

UQ END 


le seguenti informazioni: 

Numero dei partecipanti 58 

Costo delle cartelle 1 400 cad. 

Costo della carta 2600 cad. 

Costo delle penne 1200 cad. 

Prendete due penne per partecipante (per oltre 
100 penne godete dello sconto dell’8%). Scrivete il 
programma in modo da poterlo utilizzare in altre 
occasioni, con un numero diverso di partecipanti e 
con costi diversi. 

NUMERO DI PARTECIPANTI: 

58 

COSTO PER CARTELLA: 

1 400 CAD. 

COSTO DELLA CARTA: 

2600 PER BLOCCO 

COSTO DELLE PENNE MENO 8% 

1200 CAD, 

COSTO TOTALE « 

Lire 360000 

Tabella 3,9 Risultato del programma ‘‘materiale di 
cartoleria” 


20 INPUT N'CjPjSjD 
25 PRINT 

30 LET C“N#{C+-B#2toP#( 100-S)/100)/100 
40 PRINT"NUrtERP PARTECIPANTI : " 

45 PRINT N 

50 FRI NT "COSTO DELLE CARTELLE : " 

55 PRINT CJ-'CRD." 

60 PRINT "COSTO DELLA CARTA : n 
65 PRINT B; "PER BLOCCO" 

70 PRINT "COSTO DELLE PENNE MENO"; Si "X" 
75 PRINT P; "CAD." 

80 PRINT 

85 PRINT "CQSTQT0TALE=” 

90 PRINT "LIRE" ;C 
95 PRINT "*#**#*****4” 

100 END 


Listato 3,1 Programma “Viaggio in Usa 1 


Listato 3.2 Programma Costo seminario 1 



4. Lo sviluppo 
dei programmi 


Cominciate dai pre-programma 

Questo capìtolo vuole insegnarvi a sviluppare 
dei programmi di cui avete bisogno. Se un program- 
ma è scritto troppo frettolosamente perderete mol- 
to tempo nella implementazione dei cambiamenti 
che in seguito si renderanno necessari. B tempo 
impiegato nella preparazione dei vostri programmi 
non è mai sprecato. Quanti progettano sistemi ge- 
stionali o ne scrivono i programmi debbono confor- 
marsi ad una serie di procedure formali. Analoga- 
mente, anche quanti sviluppano programmi per 
proprio conto debbono abituarsi all’osservanza di 
certe regole. 

Comprendere il problema 

Il primo passo consiste nelTaccertarvi che ì dati 
del problema che intendete affrontare vi siano 
estremamente chiari. Sono esatti e comprensibili i 
termini di riferimento? Ciò significa die dovete 
controllare il significato di ogni termine usato, so- 
prattutto se di gergo. Dovete altresi essere sicuri di 
comprendere tutti i segni matematici utilizzati per 
esprimere le varie relazioni. Pertanto, aQ’inizio, po- 
trebbero essere necessarie ricerche e letture docu- 
mentativi Ricerche e letture d’approftfhdimento si 
rendono necessarie anche nei casi in cui conoscete 
bene il problema ma non vi è ancora chiaro quale 
metodo seguire per risolverlo. 

Progettazione dell'output 

Il primo passo nella progettazione di un pro- 
gramma è lo studio dell’output. In particolare do- 
vete riflettere e prendere delle decisioni sui punti 
seguenti. 


Il risultato del programma può essere visualizza- 
to, stampato su un supporto cartaceo e/o va trasfe- 
rito in un archivio. 

Il vostro risultato va semplicemente stampato (o 
visualizzato), oppure va memorizzato in un archi- 
vio, ovvero occorrono entrambe le cose? Ciò vi 
porta a decidere con esattezza cosa va stampato e 
cosa invece va scritto neH’archivio. 

Ad esempio, il vostro obiettivo è di scrivere un 
programma per leggere l’archivio dei dati cf un ma- 
gazzino e produrre un elenco degli articoli da rior- 
dinare, Mettiamo, per il momento, che decìdiate di 
scrivere un programma che identifichi gli articoli da 
riordinare. Allora dovrete considerare: l’output ri- 
chiesto deve consistere soltanto in un elenco dei 
prodotti da riordinare , o deve essere al contempo 
l’input per un programma per remissione degli or- 
dini d’acquisto? Se volete un elenco degli articoli 
da riordinare, quali dati dovete stampare? 

E* necessario stampare tutti i dati deirarchivio 
relativi ai vari articoli da ordinare o, all’estremo 
opposto, vi bastano solo i codici di questi articoli? 

Un programma di questo tipo è esposto nel ca- 
pitolo 1 1 , dove il contenuto deirelenco comprende 
sia i codici che le descrizioni degli articoli da rior- 
dinare. Non è stato stampato il contenuto delFinte- 
ro record ma solo i dati necessari all’esatta identifi- 
cazione dì ciascun articolo. 

Dopo d’aver deciso quale sarà il contenuto deì- 
Foutput bisogna considerarne il formato e Timpo- 
stazione generale. Ecco le principali considemzioni 
da fare: 

* in quali colonne vanno stampate le variabili? 

* le cifre debbono essere troncate o arrotondate? 

* occorre inserire dei titoletti per ogni colonna? . 

* quanti spazi occorrono tra i titoletti e le colon- 
ne? 
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• è opportuno sottolineare i titoletti? 

L’output d 5 un programma per 3’emissione dhrna 
distinta di riordino potrebbe cominciare come mo- 
strato nella tabella 4, 1 . 

i0 FRlNT ir PRENT " 

28 PRINT J, £TflMFfl jr 
40 PRINT"LISTB DI RI ORDÌ HO 11 
50 PRIHT 

60 PRIHT 11 CODICE" ; TRB<7) J 11 DESCRI ZI OHE" 

£5 PRJHT" 1P j TfiBC?) j *' — 

70 PRINT 

Tabella 4 ,1 Titoletti per una distinta di riordino 


Dati di input occorrenti 

Dopo d’aver deciso le caratteristiche dell’output 
occorre identificare i dati di input necessari Se i 
dati da elaborare sono numerosi è consigliabile leg- 
gerli da un apposito archìvio (sempre che esista o 
sia possibile crearlo). Dì ciò parleremo nel capitolo 
li* I dati occorrenti solo per quello specifico prò- 
gramma possono essere immessi mediante delle di- 
chiarazioni DATA, mentre quelli che cambiano tut- 
te le volte che fate girare il programma è meglio 
darli mediante istruzioni INPUT. 

E s possibile che voi non siate runico utilizzatore 
dì quel programma. Soprattutto in tale caso i vari 
valori debbono essere immessi nella loro forma più 
| comune: ad esempio, dando 12.5 invece di 125 per 
un tasso di interesse (vedi ad esempio il problema 
del mutuo edilìzio del capitolo 12). 

La visualizzazione d’una serie di esaurienti mes- 
saggi aiuteranno Putente ad utilizzare il programma 
con maggiore facilità guidandolo, ad esempio, nella 
fase di immissione dei dati, 

Un ulteriore aspetto della progettazione delPìn* 
put è rappresentato dal desiderio di disporre di 
qualche forma di controllo del programma durante 
la sua esecuzione* Ad esempio, nei problema del 
(L riscaldamento” (capitolo 12) allhitente viene chie- 
sto se desidera fare elaborare ulteriori dati L’utiliz- 
za tore interagisce rispondendo S o N. Esempio: 

100 PRINT “ALTRI DATI? ” 

105 PRINT “ (S - SI, N = NOr 
1 10 INPUT Y $ 


Diagrammi dr flusso 

Quando le vostre idee su quanto vi occorre sono 
abbastanza chiare, cominciate a sviluppare ia se- 
quenza logica delle istruzioni del programma. 

Questa fase può essere implementata disegnan- 
do appositi diagrammi di flusso (in inglese flow- 
chart). I simboli più comuni utilizzati a questo sco- 
po sono illustrati nella figura 4.1, * 

Un esempio deìfuso di questi sìmboli è dato 
nella figura 4.2, il cui scopo è di illustrare il proces- 
so per il calcolo della media aritmetica fra tre nu- 
meri, L’obiettivo di un diagramma di flusso è quel- 
lo di garantire che la logica sia corretta, prima dì 
passare alla fase di scrittura più dettagliata delle 
singole istruzioni. 

Nel corso di questo stesso volume vedremo ulte- 
riori esempi di diagrammi di flusso ad illustrazione 
di altri programmi. 

Spesso il diagramma o Panalisi del problema evi- 
denziano che una data operazione, nel corso dello 
stesso programma, verrà ripetuta numerose volte. 
Quando è evidente che una stessa sequenza di istru- 
zioni potrebbe rendersi necessaria parecchie volte 
nel corso del programma, vai la pena scriverla una 
sola volta come subroutine in modo da poterla uti- 
lizzare tutte le volte che serve. II capitolo 9 è dedi- 
cato appunto alle subroutine, 

il passo successivo alla stesura dei diagrammi di 
flusso è la scrittura vera e propria del programma. 
Ma il lavoro non finisce qui. Una fase importantissi- 
ma nella scrittura d’un programma efficiente consi- 
ste nella sua prova, al fine di accertarsi che esso 
produce in pieno gli effetti desiderati* Vediamo 
dunque come provare e come documentare i vostri 
programmi* 

La prova dei programmi 

Se nelTusare il linguaggio basic commettete un 
errore, i! vostro VIC se ne accorge immediatamente 
e vi invia un messaggio per informarvi che il vostro 
programma contiene un “synt&c errar* * (errore di 
sintassi o istruzione sbagliata). Esempi tipici di 
syntax error sono gli errori di digitazione (es, IPUT 
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invece di INPUT), la formulazione sbagliata delle 
istruzioni (es. LET X + Y « S invece di LET S « X 
+ Y) 3 nomi di variabili innaccettabili (es, ZA invece 
di ÀZ). Prima di andare avanti dovete chiarire e 
mettere a punto tutti i syntax error* 

Ma anche dopo questa ripulitura il vostro pro- 
gramma può non essere ancora del tutto corretto. 
In particolare potreste essere incorsi in un errore di 

esecuzione (execution error) chiedendo al compii- 

# 

ter di fare qualcosa che esso invece non può. Ad 
esempio, se i valori calcolati dal vostro programma 
sono troppo grandi o troppo piccoli avrete un tra- 
bocco ( overfìow ) t cosa che succede, ad esempio, se 
cercate di dividere un numero per zero. Un altro 
errore di esecuzione si verifica se tentate di assegna- 
re una stringa ad una variabile numerica (ad esem- 
pio usando D invece dì DS per la data 26/08/83), 
Un programma che gira con successo, senza che 
si verifichino errori di esecuzione, potrebbe non 
essere ancora a punto, a causa della sua non corret- 
ta logica. Pertanto, prima di far girare il programma 
dovete lavorare sul vostro diagramma di flusso e/o 
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le istruzioni con dei dati tipici. Questa operazione 
viene chiamata “elaborazione a tavolino”. Successi- 
vamente fate girare il programma sul vostro VIC 
con dei dati tipici. Questi dovrebbe essere scelto in 
modo da testare tutte le sequenze di istruzioni del 
programma (in corrispondenza di tutte le ramifica- 
zioni del diagramma di flusso), 

E* importante mettere per iscritto tutti i detta- 
gli del programma e il modo di utilizzarlo, per con- 
sultarli in un secondo tempo. Perchè la vostra do- 
cumentazione sia completa strutturatela seguendo 
questo schema: a/ titolo di identificazione; b/ indi- 
ce del contenuto; c/ riassunto; d/ descrizione del 
problema; e/ specifiche del problema; f/ moduli per 
l’input e per l'output; g/ uso del programma; h/ 
interpretazione dell’output; i/ modifiche; 1/ appen- 
dici eventuali. 



Aggiungi 1 calcola 

al contatore la media 
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LÀ traduzione del nome del gio- 
co (alto-basso) è molto esemplifi- 
cativa. Infatti per mezzo di que- 
ste istruzioni (alto e basso) prima 
il computer e poi voi, indovinere- 
te un numero compreso tra 1 e 
1023 inclusi. 

Il primo che indovinerà certa- 
mente ii numero è il computer, 
grazie alla subrotinex 1000. Sul 
video sarà visualizzato il, se é le- 
cito chiamarlo cosi" ‘‘numero 
tentativo 7 ’. Se questo è più aito 
del numero che avete pensato, 
scrivete “Alto 5 ’, se invece è più 
basso, battete “Basso”, Quando 
il numero visualizzato sul televi- 
sore sarà quello da voi pensato, 
scrivete “Giusto”, À questo pun- 
to sarà visualizzato il numero dei 
tentativi utilizzati per trovare ii 
“misterioso”. 

Poi sarete voi gli indovini. Con 

10 stesso ragionamento di prima 

11 computer vi dirà se il numero 
da vpi battuto è alto o basso. Do- 
po avere visualizzato questa os- 
servazione voi potete continuare 
a provare premendo il tasto “c st , 
oppure arrendervi battendo il ta- 
sto “a”. In quest’ultimo caso al 
centro dello schermo sarà visua- 
lizzato il “fatidico numero”. 

Per mezzo della formula con 
la quale il computer dovrebbe in- 
dovinare il numero, i tentativi 
per realizzare questo scopo non 
dovrebbero essere più di dieci. 

Se voi date al computer un’er- 
rata indicazione (es. basso al po- 
sto di aito) alla fine, quando sarà 

impossibile al 1 0 tentativo trova- 
re il numero giusto, verrà esegui- 


ta la subrotine 1400, Provate. 

* Sub , 1000. E’ la subrotine per 
mezzo della quale il computer 
trova II numero. 

Sub 1100 se è Alto 
Sub 1 200 se è Basso 
Sub 1 300 se è giusto 
Sub 1400 per la “Bugia”. 

* Sub 2000. Prima il computer, 
per mezzo della funzione RND 
(random) “pensa” un numero. 
Tocca all Avversario indovinarlo. 

* Sub . 3000 . Contiene le frasi di 
esemplificazione e di funziona- 


mento del programma. 

N.B. Non bisogna toccare nessun 
tasto durante la fase di inizio, Le 
attese sono ottenute mediante il 
For...to loop. Un minimo tasto 
sfiorato potrebbe far cambiare il 
numero delle prove del Compu- 
ter, come lo potrebbe far cambia- 
re un errore nella battuta degli 
ordini “alto”, “basso”, “giu- 
sto”! 

Alessandro Aldo Garbagnalt 


V fa Savona r ? 
20144 Milano 
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Questo programma consente la 
creazione e la registrazione su na- 
stro di un elenco di indirizzi. Es- 
so consente poi il prelievo da na- 
stro, la visualizzazione e la stam- 
pa degli indirizzi contenuti in ta- 
le elenco. 


Mailing iist 

Il programma è dotato di una 
funzione di sorti ng articolata in 3 
chiavi, 2 sottochjavi di ricerca e 3 
opzioni aggiuntive, il che permet- 
te una selezione al quanto accu- 
rata degli indirizzi da stampare. 

Esistono anche diverse opzio- 


ni di stampa ed un opzione per 
Pavanzamento automatico o ma- 
nuale. 

Valerio IVI. Cattama e 
Claudio F, rtflarzoratr 

Bìts & Bytes 

Via Montegrappa, 4 - Milano 
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" e FRI NT 2$; 
SU NASTRO" ? 


10 PRINT”3 M t SPRINT T n r s F 0RN“2T039 s PRI NT 11 tMEX TW s PR I NT " T = 

20 FOPN="2T 023 * PRIMI "f ".:SFC<30>?” : sNEtfTN 

30 PR I N T“ L' 1 f : FGRM=2T039 : PR X NT " _" e ; NÉXTN i PR I ! IT " J" t 
40 PR I NT " SS&MMfcr ; T AR CAI M M A ! L I N G L I S T " 

3Q PR I NT i PR I NTTfìB < 1, 5 > ,r * * $ * 

60 FRINÌ :PRINT 

7G PR I NT ; RR I MTT AB < 6 > 11 COFVR I GHT 1 30 1 & X T3 Y BYT E8 L| 

30 Pft I MTTAB < 5 V V I FfiLE MONTE GRAPPA 4 - MILANO" 

30 PRINTTPBC I2> " TEL . 0g. - 573344" 

35 FORT™ :i T 030 0Ò : MENTI 

lOO CLP :P0RNN-lT040sZ#=Z*+ 1 '-’ 1 eHEXTHN : RR IMI fl 3SELEZ IONE FUNZIONI 
110 FRI NT" 1 - ISTRUZIONI" : FRI NT "2 - CREAZ I OHE ELENCO INDIRIZZI 
1^0 FRI NT "3 - PRELIEVO INDIR- DA NASTRO E STAMPA ■» : FRI NT '4 - FINE PROGRAMMA 11 
13G PRINTZ^jj 

140 FRI NT" — INTRODURRE NUMERO DI SELEZIONE — 

145 H~ 1 sGÙSUB2000S:Z-VAL<X£> : I FZO 1 AND2O£ANOZO^ANri2O-4THENGGSTlB2Oi 0i3 s G0TQ1 45 
l 5 0 ONZ GO T O 500,1 00 0 , 2OO0 ,, 4 U 00 
50O PR l NT " Z3I STRUZ I OH I " 

510 PRTNTZ*,' 

520 FRI NT "QUESTO PROGRAMMA CONSENTE LA CREAZIONE " 

525 PR I NT" E LR REGISTRAZIONE SU NASTRO DI UN ELEN= 11 r 
530 FRI NT "CO DI INDIRIZZI." 

535 PR I NT ; PR I NT "ESSO CONSENTE POI IL PRELIEVO DA MASTRO,,"? 

5 4 0 P R 1 NT H LB V I SU AL 1 Z 2 A 2 1 0 NE E L A STAMPA DEGLI I N— 1 1 ? 

PR1NT "DIRIZZI CONTENUTI IN TALE ELENCO." 

FRI NT SPRINT "IL P R OG R AM MA E ' O OT RTO D I UN A F Li NZ 1 0 N E 1 1 
PR I NT "D I SORTI NO ARTICOLATA IN IN 3 CHI AVI ,2'* 

56© PR 1 NT "SOTTO C H I A V I DI RICERCA F 3 OPZIONI AGG-" 

565 PRINT ji GIUNTIVE, t IL CHE PERMETTE UH A SELEZIONE" 

570 PR I NT J| ALQUANTO ACCURATA DEGLI INDIRIZZI DA" 

575 PRI NT 11 STRI' IRA RE, " 

530 FRI NT : PRI NT 11 ESI STONO ANCHE DIVERSE OPZIONI DI STAH= ,T 
5S5 PRI NT "PO ED UN'OPZIONE PER L' AVANZAMENTO ALITQ=" ; 

53 O PRI NT "NAT 3 CO O MANUALE." 

595 FRINTZf? 

SUO PRI NT “—PER CONTINUARE, PREMERE ^RETURN*- " ; 

6 05 H- 0 : GO SUR2 @ 0 00 
6 1 0 PR I N T " 31 STRUZ IONI ,J 
615 PR I NTZT .5 

620 PRT NT" CREAZIONE ELENCO INDIRIZZI SU NASTRO:" 

625 PRI HT .-FRI NT 11 INTRODURRE I DATI CHE COMPONGONO CIASCUN" : 

630 FRIHT" INDIRIZZO, TENENDO PRESENTE CHE IL CODICE" s 
635 FRI NT 11 A/N < PlLFANUFIER I CCO PUD' CONTENERE UNA" 

640 FRI NT "SOLA F'ARTE ALFABETICA ED UNA SOLA PARTE" 

645 PR I NT " NUMER I C A . 

65®' FRINÌ SPRINT Pi ES* CODICI LEGALI: AÀMB45S-SSPTWE-ETC. " 

655 PR I NT " ES . COD I C I IL LEO AL I : A R65 J — S2 T2 4 --ET C . " 

660 FRI NT SPRINT" IL CODICE 01 AVVIAMENTO POSTALE CONSTA" 

665 PRI NT "PI 5 CIFRE OBBLIGATORIE. IN CASO DI DO— 11 
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67© PRIMI "DICE ESTERO O IGNOTO j, INTRODURRE '00008'."; 

675 FRI NT SPRINT 11 SE NON VI SONO PIU' INDIRIZZI OR REGI-" 

680 PRIMI " STRARE SU NOSTRO I NT RQDURRE '339999' CO- 1 '; 

6S5 PRIMI "ME CODICE A/N PER CHIUDERE L'ELENCO, " 

698 PRIHTZ#; 

6SS PRIMI" — PER CONT I MURRE y. PREMERE jSFETURN» — 11 ; 

7G0 M=8 : GOSUB280O0 
705 PRIMI "31 STRUZ I OHI " 

710 PR I NT2$ ; 

715 PRIMI' 1 PRELIEVO INDIRIZZI OR NASTRO E STAMPA s " 

Z2U PR INI s P RIMI " U E F 1 N t H I J U L. t C H 1 M V 1 Li I R 3 C ERCR PER IL" 

725 PRIMI 11 CORI I MG r TEMERE PRESENTE GUANTO GIR' S I " 

730 PRIHT ,J E ' DETTO CIRCA IL FORMATO DEL CODICE AL ” *' 

735 PRIMI "FBNUNER ICQ E DEL CODICE DI AVVIAMENTO M 
740 PRINT "POSTALE. " 

745 PRIMI :PRiNT Jt P0SI2l0NARE SEMPRE IL MODULO DI STAMPA" 

750 PRIMI” SULLA PRIMA RIDA DELLO STESSO , r POICHÉ' " 

755 PRINT "LA RICERCA DELLA POSIZIONE DI STAMPA" 

7SO PRIMI 1 ' DESIDERATA VIENE EFFETTUATA AUTOMATI- 1 ' 

765 PRINT'CAMEMTE DAL PROGRAMMA." 

770 PRIMI SPRINT "SE SI E ' GPZIOHATO PER L ' AVANZAMENTO" 

775 FRI NT "MANUALE ^PREMERE 'RETURN ' PER AVANZARE." 

78£i PRIMTZt; 

785 PRIHT" — PER CONTI MURRE, PREMERE JFETURH» — "? 

790 K“0 sGOSL# 20O80 
795 0010190 

1000 FRI NT 1 ' □PREPARAZIONE ELENCO INDIRIZZI SU NASTRO " 

1610 PR1NT2T; 

1015 PRINT" INTRODURRE 1 SEGUENTI DATI:" 

1020 PRIMI s PRINT 1 '— HOME DEL PRESENTE ELENCO— 13 ; 

1022 M : - 1 0 : OD SUB 2 O000 : I FFF$~ n 11 THENGGSUB201 00 : GOTO 1022 

1629 OPENly 1 1 ,FF:|: 

1030 PRINT" 3CREAZI ONE ELENCO INDIRIZZI SII DISCO' 1 
1035 PRINTZ*5 
1040 N-H+l 

1 050 PR I NT "HO. PROGRESSIVO D I QUESTO I MD I RI ZZO : 11 r MI Ut < STR*< N ; ,23 
1060 PR1NTZS; 

1070 PRINT " I NTROOURRE I SEGUENTI DAT I e " 

ISSO PRINT SPRINT" — CODICE iVN < MAX 12 C- > M SPRINT" 

1 OS5 X- 12 s GOoUB2O08O sN 1 

IOS0 I FNÌ "999999" THENN2I— " 31 :NCS — ” " :N4T-" r ' ;N5T= ,M| ìMB*-”" :GOTO1220 
1 095 GOSUSStìOO sOOSUBSlOO : i FKK- 1 THENGO3UB201 OS : GOTO 1 085 
1G97 IFN1$=" "THEHN1 f= ,J 31 

110© PRINT : PRIMI SPRINT" — - RIFERIMENTI <MHX 16 C. !; j " : PRIHT 11 "? 

1110 X— 1 6 : GOSUG2800C1 :N2 

1128 PRINT : PRIMI SPRINT" — NOMINATIVO <MRX 30 0. >" SPRINT" ” ,P 
1 1 30 X-30 :GO3UB20000 ;N3S=X* 

1140 PRINT SPRINT SPRINT' 3 — INDIRIZZO LHAX 30 C. > " : PRINT" ,J ■ 


1 ISO 


l 30 : GOSUB200OG :N4T=;vT 


1160 PRINT SPRINT SPRINT"— CAP <5 CIFRE > M : PRIMI " 

1 1 70 X =5 ; GOS UE 2 8 00 © : N 5L-LL : IFLEN N 5 J: > < > 5TH E H C4Cf S LI PC 8 180: GOTO 1 17 © 
1175 FORMAI T0LEN<N5$> :N0^=MID#^N5^,M, 1 * 

3 177 I F ASC: *: H0Ì > < 4 S Q R A S C < N ©I > >5 7T H E NG OS U B2© 1 00 ? G O T O 1 1 ? 0 
1173 NEXTM 

1180 PRINT SPRINT SPRINT" — LOCALITÀ' <MAK 24 C. > " SPRINT " 

1 130 X-24 :GOSLIB20000 sH£$=X$ 

1200 PRINT :PRINTZ*; 
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1 2 1. 0 FR I NT " CORRE Z T ON I CSI -NO > Jl .i 

121 ? X=*2 5GOSUB20SOO :MC£=K$ : I FHC*=°SI ’'1'HENN-N— 1 ;GOTiM03O 
3 .2 1 ? I F- MCS <> 11 NO 11 THEM 0 OSU B 2 0 J O 0 ; 00 T 0 1 2 \ ? 

1220 ZZ$=CHR£< ±3> SPRINT#! .NI# *2Z#^M2*; ££:$ ;N3$ ;M4* ;ZZ£ ;M?T;ZZ$ jNS* ?ZZ$; 

1 230 1 FNì #0 " 939939 ,l THEH 1 030 

1300 CL.OSEl SPRINTATINE CREAZIONE ELENCO INDIR. SU NASTRO" 

1310 PRINTZS; 

1 320 P R I HT "TOT , INDIRIZZI RITO 1 3TR RT T 5L » NASTRO e " fili DI c; s TR# < N ~ i ;. , 2 > 

1330 FRINÌ 2*; 

1340 PRINT 1J ™- PER CONTINUARE ., PREMERE RETURN»- " ; 

134? X=0 :GOSUB2000G 
1356 GOTO 1 00 

2000 FORX—l T03B * ZZ^-ZZT + " " sHEXTX sZZ#=ZZ^+CHR#< 13> s ZZ$=ZZ*+ZZ*+ZZ*+ZZ* 

200? GO3UB2Q07 :GUT 0^020 

209? PRINT'^PRELIEVO INDIRIZZI OR NASTRO E STAMPA " 

201O PPlNTZ^.s 
2015 RETURN 

2O20 FRINÌ'" — SDRTING INDIRIZZI '-.SI-NO)" SPRINT" 

203D X-2:GOSUB2O00E s I FS1 '' NO" THEN2440 

2035 i J-Sl T O " S 1 11 1 NE HG D £ UB 2© 1 0 O :G0 T 02030 

2040 FRINÌ » &W" JZZ* .5 " I MIRE LE SEGUENTI CHlftVI DI RICERCO : pt 

20?O PRIMI SPRINT" — DUANTITFT INDIRIZZI < S I-NO J " ; PR I NT" " js 

20 60 X"2 : 0 CE S UB2 0 G G O b S 2 :£ ™<T : I.F32T- " hi O " T HE N 2 03 0 
206? I POETO "SI “THENG03UB281 00 ; 0010206© 

2070 PRTNT»affWW w i?7^i ,, a»wwB — QUANTITÀ' MASSIMA INDIRIZZI" ■sPRINT 1 ' " ; 
2030 K-5sGO3UB20000 :Pt±" Ni :lFRì*- h " 0RVR1 . C R 1 T X 1 THENG0SUG20 100 =00102030 
203? FORM- 1 TOLEN CR ! T > s ROT-HJ Dir < P 1 + , M 1 > 

28 S 7 1 FA SC RBT> <40GRA3C ■: R0S0 >?7THEHGUSUB2G L 00 ;GQTQ2©80 
2038 NEKTM 

2093 PRI NT: PRIMI; PRIMI" — CODICE ANN < SI --NCO " ;FP I NT" " ; 

2 1 CO »2 ; OOSUB2800O ; S3^~Xi : I FS3&- " NO " THE! JNR=« 1 B ; G0TO225© 

2 1 0? HR ^=15:1 FS3* O "SI" THENGOSU820 1 00 : GOTO 2 1 00 

2110 FPAHT lì mW^l$'' — CODICE A3M - PARTE ALFABETICA;" 

2 i 1 5 FRI NT" DA " ; 

2120 X-U :GOSUB20©00sR2*-XT ; IFR2$==° "THENGOSUB201 00 :G0T021 20 
213G FORM- i TOLEN <R2#> :Ru$=t1I D$<R2$,M, 1 > 

21 3? 3 FM3C3 R6T> C650RA SCX ROSO > 9 0 T NEI I GG S LI B2 0 1 00 ;GOT02 i 20 
2137 NEXTM 

214® FRI NT SPRINT* 1 A M ; 

2 1 ? O X= li sGÙ SUB 2 O 0 00 : R 3 $ - X T ! 1 F R 3 $ - " " T H E NO OS U 32 01 00 :GGT 0 2 1 5 O 
2 1 60 F OftM” 1 TOLEN v R3T > s ROT-M I D $ < p 3 T r r-U 1 > 

2 1 6? I FRSC-; R6$) <65 ORA SC < R©* >>90TNEr 100SUB20 1 00 : GQT02 1 50 
2167 NEXTH 

2 1 70 I F R3f C R2I T HENGOSUB 1 00É1G : G0TG2 1 1 ù 

2 1 so codice a/m - parte numerica s ,r 

21 SS FRI NT” DA M ; 

2 1 9 O X -12 -L E N < R 2 T > : G G S UB Z OG O G ; R 4 .* =“ ; I FR 4 " T H E NO 0 SU B201 00 ; GjjT 0 2 1 SO 

2200 FORM» t TOLEN <R4* > :F;GT-MIDt- < P4.T ^N.„ 1 :> 

2 2 05 I F A S CX R © T ><40 OR: ASC < R UT > > 5 7 T HE N 60 S UB 2 0 ICO: G OT O 2 i 9 G 
220? NEKTN 

2210 FR I NT SPRINT" A 

2220 N^12 --L ENCRSIO sOOSUB260OO : T FR5I— " " THENG0SUB201 80 SG0T0222© 

2230 FORM- 1 TOLEN CR5-f > sR 0i =MID* < R5T ,r-T. 1 > 

223? I F A 3C C F-1 0# > < 4 3 OR ASC < RAT > > 5 7 T H E \ -EOO 3 UB 2 0 l 00 s OOTO2Z20 
2237 NEXTM 

2246 I F VAL < R?T> CVAL C R4^> THEHGOSUB 1 0000 ; GOTO 2 ISO 
2250 PRIMI ,h i3" ; FORX- 1 TONR ;3 :j R 3 NT " rtj" .? N1EXTX :PR I NTZZ* .f 


220 ? 

2210 

2220 

2230 

^ 23 ? 

Itti ■■■p- “-r- v*i“ 

2237 

2240 

2250 
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ili £L. O ■_! 


.“( i“ , 1 .1 

ri. a: ? J 

2277 

22^0 


277:7 


2:? 3 0 
2370 
33,23 
23:27 
2330 
234© 
3330 
3360 
2365 
2370 


2390 
7 400 
24 1 0 
242S 
2430 

"■■A 4 Vi 

244 3 
2430 
2 4in 0 
24 70 
24 30 
2490 
2500 
25 1£: 
2520 
2330 
2540 
■33513 
2560 
2 56 5 
2570 
2580 
2590 

2555 


2 398 
2399 
2600 
2610 
26 1 2 
26 1 4 
26 1 8 

26 1 9 

2620 
233tì 


PRINT"£TJ! sFORX-ITONP sprint 11 K" ; sNEXTX sPRIHT M — C H P < SI -N0> " :PRI NT" 

X=2 5GQSUB20000 :S4£~XT 5 IFS4$~ ,J H0 ,, TH£N234a 

I FS 4 S < > r 1 S I' ’ T H E N 6 0 3 UH 2 0 I 0G s 6 0 I U 2 2 60 

PR INT n &" > iFORX- 1 7 ONE SPRINT" SJ 11 ; sNEXTX 5 PR J NTZZ7 ; 

PRINT ll B ,i r SFORNITONE 3 PRI NT" ET ; rNEXTX s FRI NT" — C fi Ps" 

P P I N T ' f OR L NUME R 0 " i 

N=5 : G03UB200O0 :IFLEN<R6* ’> O5THEHOOSUB201 00 b GOTO22E0 

FORM” 1 TOL.FLN L R6$ 3 t R0 * ” M I D* ■: RS$ ,11 ., 1 > 

I F BSC- 1 àmi 4&S ORP 3 CCRO £ > 35 7 THE N GÙS U B2 0 1 0 0 3 G 0 T 0 22 Q 0 
MEXTH 

PR INT SPRINT " RL NÙMERO " i 

X»S ;GQSUR2O000 iR7#-X# : IFLEH<R7^;< O3THÉHGOSUB20 1 00 SGÙT023I0 
POR M™ l TOL EH L P7* > : PO * =N 1D:ÉCR?* ,, M ., 1 > 

I FflSO <R0H5 > <4 80FRS C < FOT ’:< >37THENOOSUB20 100: GOTO 2 3 1 0 
NEXTM 

I FF73K R6TTHENG0SUB 1 0000 I 00702270 
l F 3 2 7 ss 1 1 N 0 ' f F4 1 O 8 3T E 50 1 r R I i DS4 7- " NO" T h 5 F N 2 005 
J F S 3 7 ■“ "HO" T HEH24 4 0 

GPSUB20O7 s PR I NT 11 0 1 CH I riPRPE SE IL SURFING DEVE PfiS=" 

PRINT"ShPE RLL.fi STflHPR ANCHE GLI INDIRIZZI" 

PR I NT " CON CODI CE RLFRNUMEE T CO : 11 

RRINT SPRINT 31 — INTERAMENTE MRHCRNTE" SPRINT’ 1 <SI-NO> "t 
X~2 sGÒSÙB20OO0 = 857-X7 s IF3570 11 3 T 1 RHDSSrO ' l ND ,+ THENG0SUe2@Ì @(3 : GOTO 2390 
PR I NT 3 PR I NT ; PR J NT 1 J — MRNCRNTE DELL fi PRETE ALFABETI CR" SPRINT" CSI-HO> 

tt«2 :GOSUB20OOOiiS6T-XT: IFSiS4!<> ,1 SI ,l RMD&«O"NO ,| THEMGOSUB20ie0 sOOTO24Ì0 
PR INT sPR I NT iFP I NT " — HHNCFtf !TE DELLR PORTE NUMER I CFT : FRI NT 11 < S I -W0> » . 

73-2 : BOSUB20G00 s S74 -X7 1 T FS770" 8 I " fi ND 87 70 " MG r T HENgCfSUBLU 1 00 sGOT 0243© 

ROSI [p20:-i ? ■■ PP ! M i T OHE RVPNXl IMENI Ó RI. 1 l'OMfìT ICO 51 

PRIMI “Li NRMUHLE DOPO UGNI INDIRIZZO 

PR INT sPR I NT" — - ■ P F»S SRT0 Fì L L R 3 ì' Htl P R < RU T - M glN > M s PRIMI = 

X~3 s 6OSUE7-000O sS&£”X$ : I FSS^<'> J, RUT "RHDSS7 0 "MRN" THENG0BUB201 00 :OOTO2460 
I FS370''8I tt RHDG470 ,< 5I "TNEN2500 

PRIHT tPR INT SPRINT" — SCRPTRTO DHL SOPÌ I HG CfiUT-MRN : 1 Jl sPRI NT" > 
X=3lODSltP2O00O:S97~X7 :1F8940 '‘RUT H HHDS^O 11 MRN " T HE N G 0=> U É>20 i 00 s GO T024 90 
GO S UB 2 00 7 : FR I MT 13 DEFI H I RE I É EOU EH TI PRPHMETR I DI £T ftMP R ? " ; 

FRI NT SPRINT" NUMERO COPIE DI CIRSPJN I NO I R I ZZO " : PRIHT " ,l ; 

X-3l6OSUB200O8flPl=fVRLXX^; :IFF1<3 THENGUSUR20 1G0 1430702520 

FPINT sPRINT SPRINT 1 ' — FOEWt'ù VERT- DEL MODULO <IU RIGHE? " SPRINT 11 " 

S^as'3 £0OSUB20000 eP2«VPtL<;<^5 1 IFP2C4THENOG3I.JB20 108 b GOTO2340 

FRI NT SPRINT SPRINT* — POSI Z IONRHEHTO VERI ì CRLE <HQ. RIOR^ 1 11 SPRINT 11 

X^8 ; ; G 08 LI B 2 8000 s P 3' - V RL L ?<$ > : I F P 3 C 1 0 P F 3 :■ P 2 - 3 T NEH G0SUB20 ì UO : GOT 025 60 

P3— P3“l 

PPINT SPRINT SPRINT 1 '-" PÙ8 1 Z I ONR54ENTO OPIZZONTRLE ^NQ. TRB^ " SPRINT' 1 "■> 
:G03UB 2O000 s F4^VRL ■; Xt > ; I F F‘ 4 <0ORP4 > 1 0 i THEH GO3UB201 0 D : GOTO 2530 
PRIHT SPRINT SPRINT” — TIPO DI STRMPRNTE CCBM--HON > 11 : FRI NT " lf ? 

73- :3 :GGSUB2B0O0 s F'4-X^ 

T FP’^— 11 CBM ,r THENP ti 4 s GOTO26O0 
T FP#- 11 NON" THENP^5 ; GOTO2600 
G0SLIB2810G 5 530702595 

F0RX-ITÙ3C iZ^^2XI+" 11 sHEXTX :GO3UB2O07 

PR I NT " INTRODURRE I SEGUE HI" I DRT I s 11 

PRINT SPRINT" — -NOME DELL. ,F ELENCO VOLUTO — J ‘ .? 

X- 1 0 : GOSUB20000 b FP$ =X$ t I PPPT- 11 11 THENGOSUB201 00 : GOT 02 61 , 

GFENi ,i ,0,,FFI 
0PEM2 ,, P 

GG SUB 2O0 ;- y s PR i \ I T " NO - f->RDGF E SS X VO D } 0UE8TD i ND l R 1 220 s" s 14 IDU< STR* 1 . N > , r 2 > 
PRINTZ^> 
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2640 PR I HT - ara*}" # SPC < 4>;'T " ; sF0Rfr=5T034 jPRI NT'»“" / sNFXTX SPRINT "1° ; 

265© F ORE -STO 1 4 sPK I NT " g" ; 

2 6 5 5 F r DR X X = 1 T 0 X ; PR I K T M ja ,p ? : ME X T XX 
2657 PR 1 MTSPC < 4 > ; ‘ É | ,r : SFC C 30 > ,f R ; : MEXTK 

2668 PR I HT " ? SFC < 4 > w L ,f ! FDRX*5T034 s RR I NT rt _ M ; s NEKTX i PR I NT « J 

2670 PR I HT M ; -S - 

2680 FRI NT "TOT - I NO I R 1 77 E P03S0T 1 RL L fi S TANFO : Pl ? FI 1 07 C S TRS- ( NR >,£'> 

26F0 RR I NT 11 TOT « INDIRIZZI SCRRTHTI DAL SOR T INO : » ?HI D£ < STR* CHS 5,2 > 

2700 N-H + I 

2 7 1 H PR 3 NT ” gBSS 1 J ; S P C < 3 5 > ; h I 0 a? < S T R $ < H > , 2 > 

2720 T NPUT#1 , NI I- , N2f N3$ ,N4* , N5? H6 £ 

2725 IF-M1#=“ ,I THEHM1#= ,IH 

2730 I F N 1 £ = 1 1 99 99 9 3 11 T HE MCL OSE 1 sC L O SE2 - 0 0 T O 3 200 

2 74 ti PR: I NT » ; 3 PC- < 5 ; N2* s 

2750 PR I MTSPC < 30-LENCH1 * > —LE hi LH2* :■ > .r N 1 # ; 

2760 RR I NT " ; SFC L !T. :> ; H3tf r 

2 7 70 FRI NT" es " S P I” f. 5 > .7 1 1 4 T : 

3780 PR ! NT M SmmSmmmsm" t SPC < 5 > ; N5 J r 
37 90 PR I MTSPC < .1 > ‘ 

2800 I FS 1 *= "NO* 1 THEN2* 1 0 
28lti I F S 3* - 1 1 N Ù ” T FI P 1 428 3 6 
28 2 0 R O 3 LI B 8 Cu 0 

2830 IFNl#^* 1 ,l flNDS5$=- ,,J 3I "THENfiSS© 

2835 IFNl^-*’ "THEN2950 

234© I Rii T- JJ " h, S I THE 142380 

2845 I FH 1 *= Jt ,J THEN295© 

2850 IFN2S- I “"RNDS7^="SI "THEM2&6& 

2355 I FM2fc- THEN295© 

2 860 I F M 1 :t <fr 2 $ 0 R M 1 $ fr P 3T 7' 1 4C£ N2 9 5 0 
2370 1 FH2T- 11 "THEH2S90 

2880 I F VAL ■. J <VRL CR4-T ■ ÙRVRL.L \i2S >>VRL 7 ESC > 7 HEH295S 

2890 IFS4:I— "NO" THEN2310 

2300 I FVRL *: H5 T ■ <VRL < R6 7 > OR VAL < N5* > >7flL k R 7*’ '■ THE M 2 3 50 
2310 N 0=4 40+1 

292G I F82-T" ■’ 3 I " flNDNA= VAL K U 1 T > THEHF P- 1 

293® F'R I NT ,p > SFC C 34 :> : H I D* 3 f R* < Ni I > , 2 > 

294 R 00X03000 

2950 H.S» NS+ 1 sPRI NT iJ J 1 ; SFC <35> J M IO* <STR^ INS > ^ Z > 

23 35 I F S 3T •- 1 H M OH r ' 1 HE NP P l NT tV fri NT " — P E: R Q 0 NT I h E U R RE , p R; E M E P E E T U R l -l m ■ — 1 1 : 

23 66 lFS3T-"Rf_ JT NJ THE N2 S> 3 0 
2970 X=0:0OSUBS0800 

2975 PRIMI"' ; ZX* ? ZX* ; 

298171 PR 1 NT " gmmmm" ;■ SPC < 5 > ; Z5<$’ t 
2385 PRINT " jfSFC 5 ;■ 

2337 PR I NT ' 1 ; SPC '■ 5 - : ZX* : 

2338 PR I NT ” : SPC ■:! 5 > r ZXT ; 

2 990 u Ci T 027 0 0 

3000 PORLO- 1 TOPI 
3010 I F P 3— 1 O TH E N 3030 

3820 FÓRL 1*1 TOP3 : PR X NT #2 , r " " sNEXTLl 

3 0 3 Ci P R I. N 7 # 2 r 3 F : ' C < F^4 > 0 4 2 * > S P CX 30 — LEN< NI LENL H 2 .7 > > ; H 1 -t 

304 Gì PR I NT#2 f SPC < P4 > ; H3T 

3050 PR I NT #2 , SPC<P4 > ;N4T 

3060 PR I NT #2 ^ SPC < F'4 > _? N5$ * SPC C i > ;H6T 

3070 i FP2-F3^4THEN3090 

3880 FORLÌ = lTCiP2--P3-4=PRlNT*2 r " 11 sNEXTLl 
30 9 0 I F S 8i « ‘ 1 A U T 1 f THE N3 i 20 




31 M PR I NT " — P€|^ CONTINUARE , PREMERE .EPE TUR MB- — " : 

3 1 1 Q X “ PI f j L> S Ufc> 2 0 00 0 

•3 1 L 3 ESIMI " P! !1I1^ ^ : LÌ 4 !:I ‘H i:?:£!^}' ‘ * Ztf* i 2K* .? 

3.LC0 NÉX'TL 0 

3 1 30 P R l NT M .? SPG < 3 ::■ : ZM s 

3 I 35 PR 3 HT " *^ÙSSMMlS6Kfl“ ; SFC ; C 5 > * “HT p 
3 1 37 PR INI" sma immmmSi 1 ' .: CPU < 5 2X f r 
3 i 33 PP I NT '■ ' r ; SPC < 5 : ; Z2X ' 

3 1 43 3 F FF — ■ L T HENCL05E 1 : CL03E2 : OOTOS^OO 
T: ! 50 GCTO27O0 

3280 PRINT 1 ' 3” INE PRELIEVO INDIRIZZI E STAMPA* 

3tèlé IPN1 &*«$$$$$$. * THHHPR I NT 11 CELE NCO INDIRIZZI ESAURITO: 11 ' 

3320 I ! 1-P- 1 THENPR I NT 11 C OLIRMI I TFT MASS I HA 3 NO IR L ZZ 4 RAGGI UNTA > ” 

.:’ ! :r! "30 f -' h! r i M T Z T ,: 

3240 F-R \[ NT ,r TOT. INDIRIZZI PRELEVATI OR NASTRO s r ' ; M I Q* < STR’I < Nfì+NS Jj , 2 > 
mm PP I NT ,r TOT ^INDIRIZZI PASSATE ALLA STAMPA ; " IDf <STR$ <NN j * £:■ 

3zm FRINT ,I TGT. INDIRIZZI SCARTATI DAL SORTI NO ; " ^ N I O# <■ 3TP3- < MS > *2> 

*2 7 0 P PINI " TOT* i 40 O LIL I SYllMF RT I ; ' 1 ; M 1 1 TP C ST R :£ •:' H R*r 1 > , 2 > 

3 3 SO PRIMI Z# ? 

3290 PR IMF ' f - TER C ■ ON T I HI j A RE F^RE M E R F :tf < ET URNA — " - 

3 295 M= @ : G 0 S UB 2 ù OG 0 

3300 GOTO 180 

■1000 PR I NT 11 Z!" SENO 

SMOG MI «a»' 1 ,h 

S 010 I E N :i Is " 1 ■ r H E MS g 70 

3020 FORMAI TOLÈN EHI T J 

COSO Ni-M I D$ 'E N J. :i , M .. 1 > 

e 04 o i r- h s c < m > > a e 5 a he e a s C •: m t > < = 9 o r h eh n 1 1 « n 1 t ■ 1 ■ m $ 

3050 IFASC»:i4i::i>==4Si : ihlDHS.CkMT><^57TH£LNM2^-H2-$+N^ 

Bolso me::tm 
0070 RETURN 
3 I O0 KK=0 

3110 I FM 1 ’ 1 THE MS 1 50 

8 1 20 FORF— 1 IO LEM < Ni 1 ? —LEM 1 ! MI * ? + l 

8 1 30 I S J M 1 M I DS F H 1 X r K L EN < M 1 1 > > THENEt 1 50 

3 1 40 UF.XTK ìKK= 1 ; 007 OSI 

8 1 58 I Fl*2t=" "TMEMS 1 90 

3 1 SO F 0 R K = l'I G LEM N J. I :> -LEM-: U7T > H- 1 

3 J. ?'0 I FM2*^HI Dar<N 1 X , K , LEM C M2*> >THEN8 1 90 

euEiO NEXTK:KK=1 

3I90 RETURN 

100OO PR I NT “ MASSIMO INFERIORE AL MIN I HO*" 

1 00 IO FORT - IT 0 30 O O : H E XT T 

i 002 0 pr iNT - m&v&mmmjmmmii ìsel^" : i--z* 

1003O RETURN 

200 IO PR IN I' " . 31 ; 

30020 GEI K I ^ ; I FLLN'VXT >«XANDX1 ^OCHRIe^: 2Ù ::- RHDX 1 SOCHRS C 1 3 >0RX1J= M " THEN2OO20 
30O30 IF'XI:* : -CHR^ v2O5AND>:i=0THEHF , RINT ,l !i l ‘ ? S0OTO2G000 
3Ei040 ìl^iéitìCHRJp: 3 fJ> TMEH2O070 
200 5 0 J F X 1 f a C HR X f 1 :3 ; . THE M2 Ci G3 0 

2O000 PR 1 i IT 11 fll’" 5 X 11; s X£~ HT't'X 1 T ; K 1 = =< 1 + 1 s GDT0200 1 O 

20070 PRINT'IBI IBI' ; sXi-LEFT^CX^,LENfX$>-l> = X1=X1“1 :GOTO2©010 

2OO00 PRIMI "|| " i t RETURN 

20100 I FX#=° *'THENPRÌNT "B| 81” s sGOT 020128 

20110 FDREIkITGLEN ■;*;$"> sPRlHT'll ÌE3 1 ' ; SNEXTX I s PRIMI M || II" r 
20I2O RETURN 
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Da così. 


/ 



Se hai un CBM 4C XX) oppure 8000 
approfitta del^Mega power” 

Commodore. 
Un modo esclusivo per 
megaespandere la capacità dei tuoi 

sistemi Commodore. 
Per esempio col DUAL FLOPPY 
8250, a meno di 3.500,000* aggiungi 


2 Mega-Bytes. Vuoi di più? 

Con PHARD DISK 9060 aggiungi 5 
mega-bytes 3 con meno di 5.000.000*, 
E con 6.100.000* hai sotto controllo 
altri 7,5 Mega-bytes: basta scegliere 

PHARD DISK 9090. 

■* 

Certo, per essere avanti agli altri 
bisogna dare cose avanti... 


ft Commodore 

v COMPUTER 


Per avere V indirizzo del rivenditore Commodore 
ri volgili a! tuo Distributore Commodore regionale: 


LK.Uli.IA - GIRISI INI ORAEATK'A - Pi ava (.'ah .-‘ut,. W 1HMJ fhiaviri k-i UIKV JtU |[>i| »P1l:tfONl> • \tir\ Li I I T ItONJL \ O I 
CAKAMtA ■ Via iwuli. 5'C - IGNI turino -Ttl- I QMBA&OLA. I MONTINO- HOVTK FtftSONAU < ^iL - 

Tijij.: Jh' rtl^sli, ì ■ Mìfopid ■ Tvl, 02 -VJIi.-K2.GI ■ VI SE. Iti, i RIULL VI NE /I A-till'I.IA - CO.k.LL.. I nuli t . iflipuiiM - ■ ALi 

MtKHCiCttMa, 2)0 J.IHXfUdirw Tfl CUI 2.- 211,1 J.Wi * I.MILJA RÒMACNA. MARCHI N.EI.R. uì ili :iirttFflfi, 1 "A A ■ jRlIDltinkict 
/nr.-Lium ikain'.nuj - 'tal (tfO -ifh 12 IMI » 3 DSt ANA M A S l >fiA . Va f>;c: ( jppor.s K‘ ■ <*Hj; Su.TìA- I ci L_ J 1 H ■ I 
I MUMA-KIBIitt I I Al I A trÉ-t» Ir A-w, il -O0JJ4 K<>|^ K.K tal ■» J-v Ia 4.i* - ATI A5 5V5TJ-M *1- Nu Oufl.cSn.o .. C - 

OllSOViwiba-Td.tUftl. 22 ■uVKS ■ AtìftUZZO- PRAtiMASVSTl M^l ■ Vjj Tibimiiu. 52 -«IWIWar.L . T«l. dot* ^I.JìS.m AMI’ IMA 
» (j KAA L S V Siti MS i- I jì'kit ai nr 1 1 induaal i M.i f'.til ■ :<: i\i n . 1 . M riXJSjkmv TL‘f.fti9 )2> I 7.8L ■ l’Util.l A M vsl I t I A L'L I 1-tt'lf f 

- Via t . /ii-p^rr.i, S ■ V|[(W Inaili - Tel CttJ/H.MI - HU!ilNT1i!l AUTONATION SVJiTLM *rt - tarpi Oc tismniri^ ^ 

4S- \4h.Tl ■ HIUIA Ha ri. ■ Iti. rihtK-]: T5,7^22.AyJ4 » E'AlAUKlA - SlRANtiL-l t > -t tSMFt f E K S. -,fl - Vm NiLula PjwMiJl 2) - K‘I«D 
CiiJWiUa ■ Ecl. lWM4r7i,T,Ji * SICILIA - 1:1111 .COMPUTER kftOOLTTl (tcll'Llu. tiiuKppi: Cai bumr - Via La Tal in j., iJl I*. L , WKX 1 
Mi»sina ■ ì'f|. * $ARIMiNA - £,U. Stanimi liKgRiii Intaruuttói - Via S. Limitare, Di - tì*ltìù Cagliari * 'tal. 
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o Commodore 

a Roma 




P.le Asia, 21 - 00144 ROMA EUR - Tei. (06) 5916438 


CENTRO REGIONALE di 
DISTRIBUZIONE, VENDITA, ASSISTENZA 


• Vie. 20 e accessori 

• Dischi Winchester (Commodore) :5, 8, 22, 30 MB 

• Backup su nastro magnetico 

• Sviluppo procedure personalizzate 

• Contratti di manutenzione per parti di ricambio 



MEDIA MENSILE e 
MEDIA OTTIMALE 

QUESTO piccolo programmino* 
se cosi si può chiamare, contiene 
alcuni artifizi, sia pure di sempli- 
ce fattura, che possono risultare 
utili ai neofiti delTinformatica. 

Nonostante questa afferma- 
zione è da dire che le semplici 
operazioni proposte possono ri- 
tornare di qualche utilità in even- 
tuali programmi di statistica. Una 
particolare menzione al T algorit- 
mo sito dalla riga 400 alla riga 
430 ove risiede il calcolo per tro- 
vare la inedia ottimale. 

In eventuali e diverse future 
applicazioni, il lettore potrà adat- , 
tare il programma proposto va- 
llando opportunamente quelle 
; parti che non combaciano con le 
! singole esigenze. Ad esempio, se la 
statistica non è riferita ai mesi, 
sarà sufficiente modificare le di- 
citure ed il controllo dei range* 
Come si pud notare al termine 
delfesecuzione il programma ri- 
mane ‘‘sospesa” per mezzo di 
quel ciclo di GET sito in riga 
440 ; questo artificio è reso neces- 
sario per lasciare pulito lo scher~ 
ino dall'eventuale READY e per 
evitare che lo scrooì del video 
faccia perdere alcuni dati che sa- 
rebbero risultati in testa alla vi- 
deata. 


Le medie 
con il PET 


Premendo qualsiasi tasto si ri- 
prende l’esecuzione del program- 
ma per una nuova elaborazione. 


L’unico modo per arrestare l’ese- 
cuzione è quella di spegnere o 
premere i! tasto di STOP. 


1 ©@ GG1 

ne * 
128 
130 * 

.140 $ 
156 * 
160 $ 
170 * 
130 * 
130 *1Ci 
200 $ 
218 FRI 
228 FRI 
238 IF 
240 DII* 
2 50 FRI 
F OR 
278 : FR 
230 : X F 
238 • ;<:= 
386 -FC 
■3 18 : : 
326 : NE 

339 • V< 

340 ^ F'R 
35R NEI* 
368 V=t 
376 FOR 
3S8 : V- 
336 NE> 

400 7 =*t 
410 K='t 
420 va* 


GOTO 210 
* 

4 CALCOLO 

* DELLA MEDIA MENSILE E OTTIMALE 

* 

* FORNENDO I SINGOLI VALORI DI OGNI MESE 


T v -t: rr, .t. -T. -T- .t -T T- T- ■ r ■ -T. -T 1 JT* .t- -t- ^T- -T- : 


440 

458 


FRINÌ "13 CALCOLO DELLA MEDIA MENSILE " 

FRINÌ "JWflQUflNTI MESI " ; : INPUT M 

IF MCI OR M>12 THEN FRI NT "TTTT- GOTO 220 

dim vaia vai+n 

FRINÌ 

FOR 1=1 IO M 

: FRINÌ "MESE "I" "N INPUT X<I) 

: IF N( I >=0 THEN X<I)=1 

: J <:=0 

■ FOR ME=1 IO I 
: Is=N+NaiE> 

: NEXT ME 

y f / J 

■FRINÌ TAB< 24) “IT1/M = " INI < V< I )+. 5> 

NEXT I 
V=0 ' 

FOR 1=1 TG M-l 
; V=V+V< I > 

MENI I 

z=v/ai-i> 

K=V<MV2 
V<M+1 )=V <M)*K 

FRINÌ " m MEDIA OTTIMALE = " INT<VCM+l)+.5> 

GET )<$■■ IF >s$= ,in THEN 440 

RUN 
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NIM è uno di quei giochi dove 
conta solo Labilità. Infatti il 
Commodore Vic-20 con questo 
programma è imbattibile. 

Per giocare a Nim, oltre ad un 
tavolo, occorrono degli stecchini 
che sì dispongono in questo mo- 


purchè per ogni fila il numero de- 
gli stecchini non superi il 9. 

Le regole di questo gioco so- 
no semplicissime; si possono to- 
gliere da ogni fila quanti stecchi- 
ni si voglia, anche tutti, ma da 
una sola fila, I giocatori si alter- 
nano e vince chi lascia alP avversa- 
rio Fultimo stecchino. 

fi trucco per vincere è quello 
di trasformare il numero di ogni 
fila in numero binario; per esem- 
pio per lo schieramento standard, 
che sopra ho trascritto, la trasfor- 
mazione porterà a questo risulta- 


“Se la somma dì ogni colonna è 
pari, o zero, allora la posizione è 
vincente. Se invece la somma di 
anche una sola colonna è dispari, 

allora la posizione è perdente, e 
quindi bisogna rimediare. Ad 
esempio, nello schieramento; 


ma è possibile disporli in su di- 
verso numero di file (il computer 
ne permette massimo cinque), 

( ["j {*• fi fV iT> n 


La somma della prima colon- 
na da destra è dispari, quindi bi- 
sogna rimediare al più presto. Nel 
2° foglio allegato vi è la schema- 
tizzazione del lavoro delle princi- 
pali subrotines, e alcuni impor- 
tanti avvertimenti sulLuso. 

Attenzione; il criterio per cui 
il computer vince sempre, anche 
se la prima mossa è delLawersa- 
rio, ù elementare: se la posizione 




Ecco la formula per vincere 


è perdente, allora il computer ini- 
zia per pruno, rimedia con la tra- 
sformazione in posizione vincen- 
te e cosi la vittoria è sua. Se la 
posizione è vincente, allora il 
computer permette gentilmente 
alLawersario di iniziare, 

* Sub. 2000 e 1000 . Iniziano il 
programma scrìvendo prima 
quante file si vogliono utilizzare, 
poi fila per fila, il numero dì aste. 
Se il numero delle file è maggiore 


IH 

li 

imi 

IO! 

mini 

ili 
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m&p COMPUTER è una pubblicazione del 


Via del Casa letto 380 - 001 31 Roma 



2908' 

2819 

2013 

2317 

2323 


2043 

2333 


REM # $ 

REM 

FOKE 36373,51 : FRI NT ,: 3", ; ; PGKE 36339,242 

rSiNT " m ixHiaMGaaKsissass & /ni"; 

wl=0 

r ORI 4 1T0333 : NEX7 

PRINT ,f T ; "^^MflìSSKìMPUTERSMìSa^SSS-CHTROMlSSiM^ ,OMO r 
PRIMI -PRlNT • tt &MMVttiCR IL -MIGLIORE. . 

FORI"! 704536 - NEXTI 

frinì s 3tìesaae-.iLfc <3 Nax> *> , 


;373 GuSLS 


UO:ji jlO;'Ti3 


2333 

2330 

2133 

2U8 

212S 

2130 

2143 

£133 

2162 

3000 

3302 

3884 

3086 

3328 

3S10 

3029 

3030 
3848 
3958' 
3063 
3378 
3033 
4S3S 
4802 
4384 
4886 
4068 


IFD<S7HcN2i,83 

fri ixT ’• g@a^g!ia%S8a»a5iiS^i ■ roff 1 ! 11 ; = fcr 1 - 1 702300 = nexti ; 00702060 

IFS/2THEN2123 

PRIMI : F0RI"1TO£330 i'HEXTI - GC702362 

p-r 

3IM G<F) : F0RI=ì70P 

PRltfPFRIhT "SìlW-ILfi C"lftÌ3t<ST?»<I>.,2,15 J ”> •*> *; 

sosys Itóe?3«>*B:!€X7- 

r 'V ,— "T ■ — ,. ■ 

\':Z. t ÙNiV 

REM S##**####*#* 

REM is * 

REM % 3GRTÈFIX * 

REM % S 

rem mmwti&Mm 
F3RI=17CP-1 : FORv“=I-*-170F 
I FG< }-»G< J>THEN3043 
7E=0( I ) :S<I >=0<3> = G< J7=TE 
ì-ìEXT ; NÈX7 

lìr-r ■ r jr-'-HÀ — 4 : 

IF8C1Ì=8T“EH7l»7E-Ì 

ìEX7*‘r st 7E 

RETURN' 

REM ^SaesGfejRWt*# 

REM £ # 

REM iSRXVITUTTQ* 

REM % % 


4348 


4060 

4878 


REM Stì^siGSesBMtìHMf 

frinì " usar , 

FGRI-170P 

FORJ-lTJKkF-à-i-I? 

PRIMI IMMIP; 

NÉXTJ 

PRINT : ?R*MT“W; FORK-I 7G7-P : PRINT’XT ; : NERI 


he/, i *. 


4336 

5283 

5632 

5824 

5626 


P R INI " 1 'aì&ixìWm.ì:* 

,w 1l' 

C 1 uj^h 

REM 

REM % ■ * 

REM & TU MUOVI % 

REM % Jj 

REM %%%% < *a%kìf&k& 
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0 BMC 

HAIMIMEX 


Tandq 



SEIKOSHA 


sirius 

CASIO 

GRUPPO EDITORIALE 
JACKSON 



DAI 


cowany 


Texas Instruments CATARI 


ALESSANDRI A 

Via Sbtoiwdìé, 13 


CìNISELLG BALSAMO 

Vielo Mattwtti, 66 


L'AQUILA 

Via strada 30 W2 


NAPOLI 

Vsa Luigia San (elico, 77A 



ANCONA 

Vili De Qv&ai, 40 


CGMQ 

LECCO 

r 

NOVARA 

POTENZA 

TORINO 

Vie 1 . Sacco, 3 

Via L. De Vinci. 7 

Baluardo Q, Sella.. 32 

Via Micini, ?'J 

Corso Grassd 0 , 709 


AREZZO 

COSENZA 

LIVORNO 

PADOVA 

POZZUOLI 

Via F Lippì. 13 

Via CNti Màfie, 36 

Via San Siew«è, 31 

V^ H iterata, a 

Via Perfltìlos.. 13 


TORINO 

V* Tripoli. 1 79 


RARI 

Via Capm^L ItìS 


FA VAI A CANADESE 

Corso Matteotti. 13 


MESSINA 

Vhfl Del VOspro, 71 


PALERMO 

Via Lamarmors, #7 


RIMIMI 

Via Bertor*. 73 


TRENTO 

ViS«N. D r Af«>. 


SARI 

via De*r|toEr3fK#!«J , d/2 A 


FIRENZE 

Via <3. Milanesi. 23/30 


MILANO 

Otrierw Manjrenì, do 


PAVIA 

ViaC. Batiali. d/A 


ROMA 

Vìa C. Da Spaialo, 33 


T RE VIGLIO 

Via Modini, 10/B 


BASSA NO DEL GRAPPA 

Via Jacopo Da Ponte, 51 


FOGGIA 

Via Marchiani, 1 


MELANO 

PARMA 

ROMA 

TRIESTE 

Vi» Pesrolla, 6 

V-a 2m Estrani. 4l 

Pinola S. Oonà Di Piave. 1 4 

Viaf . Saverio, 133 


BERGAMO 

VH F, 0 ■Attili, 5 


FORLÌ 

Pinzai» M, Degli Ambrosi, 1 


MILANO 

Vie Cantoni. 7 


PARMA 

Via ftOrghesi. 13 


ROMA 

Viale Qua Lire Venti, 15? 


VERONA 

Via Paciere. 7 


BOLOGNA 

Via frugnoli , l 


Gallarate 

Vitì A. PS Brescia, 2 


MILANO 

Piazza Firtn±e. À 


PERUGIA 

Via n. O'AeirJreotlo. W55 


ROMA 

Urge Bai leni f d 


VARESE 

Via CarrcOio. 13 


CAGLIARI 

Via Zagabria, 47 


GENOVA 

Vìa P. F inaila , frl/R 


fri I LANCI 

Vi» Altaguaffdla , 2 


PESCARA 

Vie Gusti I, 74 


TERAMO 

Vis Martiri Pennesi, 1 d 


VIAREGGIO 

Via A. VdllP, n 


Campo sa SSO 

Via Mene, 15 Remarvi, io 


GENOVA-SESTRI 
Via Ch larauagn-s , 107F1 


MILANO PIAGENZA 

Via le Con 3« . 1 A Via I V Navem^re . 60 


TERNI 

via BMcene. 20 


VOGHE K A 

D <;a?£-A Carducci, 1 ’ 


CESANO MADÉRNO 

Via F trrini . & 


IMPERIA 

MONZA 

PISA 

TORINO 

SONDRIO 

Via DeFbacchi. 32 

Via Averne Visconti, 39 

vie xx iv Magai*. 101 

Via Orv*Èìo 4 11 

Vinti. Sauro, 2B 



La prima e la più grande 
catena di computer in Italia. 


di 5, il computer scriverà 4t trop- 
pe” ? se è 2 o 1, allora riterrà im- 
possibile giocare con cosi poche 
file e scriverà “ridicolo 11 ! 

* Sub 4 3000 (sorti Leggerà in nu- 
mero ascendente le file, secondo 
il numero di aste per ogni fila. 

* Sub. 4000 l Disegnerà tutto. Da 
notare che minore è il numero 
delle file, maggiore è lo spazio tra 
di esse, 

* Sub , 5000 v Mossa dell* avversa- 
rio del VIC: prima si scrive il nu- 
mero delia fila, poi dopo il segno 
di numero, il numero di aste da 
levare. 

Siccome il programma non 
ammette errori, se si è battuto il 
numero della fila sbagliato, es, 3 
al posto di 4, tasti come "DELE- 
TE” in questo caso non servono 
proprio a niente. Per correggere 
bisogna scrivere il numero di 
stecchini della fila, aumentati di 
uno. À questo punto il computer 
vi darà f opportunità di rifare la 
mossa. 

+ Sub. 6000 . E' la subrotines 
principale. Essa infatti sceglie chi 
deve giocare per primo e poi tra- 
sforma il numero di stecchini in 
numero binario, 

* Sub i 7000. L’ultima, è quella 
riguardante la mossa del compu- 
ter, Questi scrive prima quanti 
stecchini toglie, e poi indica la fi- 
la da cui sarà fatta questa opera- 
zione. 

Dopo ogni mossa la sub- 
rotìnes 3000 metterà in ordine le 
varie file, con lo stesso criterio 
con il quale le ha ordinate all’ini- 
zio. 

Alessandro Aldo Gar bagnati 

Via Savona, 7 

20144 Milano 

Telefono: 8354406 
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vi'VJ 

1 ■* ri 

5043 

A ■ i.' . : x i j 

■3045 

»— 4 ^ “ ■*» -1 ■“ 1 - . * ,1, 
t p +, i * !"Ì . J f 

j'053 

— . — b , tf r 3‘ 

■ Q r jj> ■* i ■ m + 

3S53 


33i--3 

*F “ ”*■ \ j-“- - 

* ^ ia." ^ P > i P Jyj . "-P >' "if" 

-, 

w O 'Lv 1 

Cf -, * D " D ; c, -v 

tt “ ■ «rt 

■J-,1 j O 

ì\ì- f vK> 

"^r ,^j 

REM «sa 

t'jOc 

REM * « 


REI * CO INC o:< » 

* & 

mi t % 


Z /- ;> ;V ì ■?. ■: a :■}: ^ 


^ ■ , 1 'Jr, * — i 

**< ri'- 

j, 1 D \ j à 1 3 ^ i M . <_ ,rt jl 

ij83b 

■ i '4 1^1 1 * 

6043 

“ T “ T rs f : - "J “ f \ Ci r 

jk- A 

r J \ I - d , w 1 ;' 

63 S 5 

f rt 

■:■ v- - d 

m?2 

^ 

i" Di T .v — ìfi i ' 


J 77 -■■ -7 7 \ ;7; A“ \ ^ . 

'' b V ^ : t' ■■ \ Ut ■ A ; 

f - 

DO 

Kp;- ' 

s; *■' -nr* 

fc: JL VD 

:?aNT<3E/£»<>3! 

r-“ ^ ^T 1 ' 2 r 

V i. D D 

fOTI 

sue 

Kd : ./’J-. 


_, ta + —, 

Od "■ d - r D<\ > " * 1 u ■ 

.-*,rr 

/ T '. f ”■ ■” r **r r *’■ ' 

■ F j"" V J- ■■' -k. ' ■_ ■ r : „ ^ ■ D 1 

V 

, .™. r-— — 

V ^ r 

Jl-. 1 . J i 

r*\ .~h j— i <- 

J f ^ . J “-» 1 - * “ \ à 1 ■ * , ■ ■• 

4 b JT" ■W fl “irf JL r «■ «Wi V' 

^ - r 

De. * D 

* r i j ■ : 1 ù Vh' li >- ri 1 • -D 


; uw 

'7 ■*?“ 

rem * 

7332 

75-^ ^ ^ 

7304 

a ' v. k 

H r- . . f A V ■ ’ ■ V 

7556 

vV hV 

e 1 '. 5L ì ì- mr S ■ r- 

— ^ —, 

; 

REM ■&(£&&%%*»%&* 

r 3 i 4 

_ r- Tf-7 
i" D ■*,-”* F £ J: 

7333 

p--^ -*v-- - j; -.-.ri-. / -V - 

FOkSi"! i DV'-v, ^ / 

5 ; L O 4? 

■"■ - \ _c- _ 

D ^ -L. ri* D J .k k „ 

— -■ 

i 

ArrA? J y-, k" -7r-"ri 

' J 1 !* 1 D '—■ -- 

i d-Jd 

— r* "T * 

J. , ■Jll"’ J, 3 l“| 1_ F . J i Ij'k- 

7353 

: -j / r : ' -■ - 7 , r --■ - 

v ■■ r >k ^ “O ’■ * k / ■ >’ * 

-T«-. — -Ti 

r ' D 1 4j 

r_ - ■_ 1 — — . i ■ r r ■» 

i j ì - i 1 1 ri l 

P ODV 

■’ s ^ vE OQV f ^ J 

— ■- =r;^ 
i 'JdC 

i‘“ Uf.El « v0 

■J ri ^-r-, 

fi DO 

■**. ir. r - * -*— • - ■ r «*- + - 

r Ri.^i /£ 

-f .. . 

P * - 

r j,’ r A “j, Hc/i 

7 

f 1 -. E. . D i ’i 

/T* ***“ p 

"J Jttf -TI . ""i 


■« ’ .* 




, -Jr 


/ AT \ J ■ ri 
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ir. 
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54 • Compiile r C!ut> 


A 



Questa programma gira su Vic-20 
ed ha bisogno di almeno 8 K bi- 
tes di RAM in più. Per farlo gira- 
re sul pet bisogna togliere le PO- 
KE e le altre cassette sul colore, 
oltre agli spazi e lineette per 
adattare il testo alle esigue 22 co- 
lonne del VIC, E* molto facile 
adattare il programma per un 
computer basic qualsiasi. 



Matematica 


Si tratta di un programma che 
permette di risolvere numerosi ti- 
pi di problemi matematici: dalla 
semplificazione di una frazione al 
teorema dì Pitagora, con altre do- 
dici possibilità. Forse la grafica 
del programma è migliorabile, 
(grafica intesa come disposizione 
degli input e delie print), A voi 
fare tutte le modifiche che rite- 


nete opportune. 

Il programma è stato intera- 
mente scritto da noi, due ragazzi 
di 3 5 anni entrambi possessori di 

vrc-20, 

Guy de Riencourt 

Vicolo delle Gi-soÈirrtì, 31 
001 86 Rnps 

Menicacci Alessandro 

Largo F„ A risani r 19 
C0 153 R-ofha 


Computer Club - 


430 PRINT a ®S*BCON UN ANGOLO £ BUE IRTI TI DRRO' IL TERZOLATG BEL TUO TRIANGOLO 


410 GETfi* ^ IFAf-" «THEN410 
420 PRIHr’USSWSTE.BEI SENI* 1 ’ 

438 PRIN7 n ®maC0N BUE ANGOLI E UN HLRTQJFOSSO CALCOLARE 
CANTI ./ 1 

440 PRIMI "(A SEC0N3R DI QUELLO CHE NI HAI FORNITO J." 

450 GETfl$:IFfì$=""TH£N458 
466 PRI NT " 3a»ÌJf?ARCOTRNGENTEr 

470 PR I N 7 " WSIÉSDO V RAI DARMI IL VALOREDELLR TANGENTE E 
4S0 PRI NT" E' ESPRESSA.” 

436 PRI HI "M TI DARÒ' L y ANGOLO DELLA TANGENTE.” 

560 GETfiS : 1FR$=” “TMEN508 
510 PR I NT ''UaMIMSTE. ALBERO* 1 ’ 

52S PRINT"J0jKHCi BISOGNO BEL VALORE Di UNO DEI CATETI E 


UNO BEI BUE LATI MAN-M 


L'UNITA' NELLA QUALE ” 


DEL VALORE DELL -ANGOLO” 


530 PRI NT” NON RETTO DI QUESTO CATETO : TI' FORNIRÒ' ILVALORE DELL' ALTRO CATE 
TO. 

540 GETfi* • IFR$=" «TKEN540 

550 PR I NT * nSMl W9RE TTA ORATESI AHAS" 

560 PR I HT " 3HMHDQ VRR I DARMI DUE PUNTI APPARTENENTI ALLA RET-TA, IO TI FORNIRÒ' 11 
578 PRI NT” L'EQUAZIONE DELLA -RET-TA IN QUESTIONE.” 

530 GETAS : 3 FA$=" ” THEN580 

530 PRINT n naW10RETTA CARTESIANA*” 

£60 PR I NT " KfiSSJQUESTQ PROGRAMMA FA ESATTAMENTE L'INVERSO BEL NO. 3.” 

610 GETfi® : I FAT=" 11 THEN61G 

£26 PR I NT Hai 1 COL I NEfiRE OD QRTOGO-IWmMftPIOTPMMII'lftLEr 
£30 PRINT"j®MWDOVRAI DRRMI DUE VET- TORI ED IO TI BIRO' SE"; 

646 PRI NT "SONO. COL INEBRI OD ORTOGONALI.” 

650 GETAS : IFR$=” " THEN650 

663 FRI NT ”13 312EQUAZI0NE DI DUE»»»fl#ÌETTE*“ 

676 PPIHT'’WSDffi®OVRAI DARMI LE EQUA- ZIONI DI DUE RETTE, IOTI BARO' IL LORO PUNTO 


688 FRI NT "COMUNE." 

636 GETAS = IFA#=" "THEH696 

706 PR I UT " 33JS W1 3RE7TA PARALLELA*' 1 

710 'FRI.NT ” SffiWSDOVRA I DARMI UN PUNTO E UNA RETTA, IO TI BARO' L'EQUAZIONE” 

72G PRI NT "DELLA PARALLELA ALLA TUA RETTA PASSANTE PER IL TUO PUNTO." 

730 GETfi£ :*IFR$=" "THEN73B 

746 Pn:INT"I3S»114RETTF! ORTOGONALE*’' 

753 PRINT"M5BESTE3SC PROGRAMMA DEL PRECEDENTE ^SOLTANTO. CHE LA RETTA SARA'” 

766 FRINÌ" ORTOGONALE . " 

776 GETR$ ; IFfi$= ! ” , Tf£N776 

7SG PRI NT "UffiBMtfVUO I RIVEDERE LE MIE POSSIBILITÀ'?” 

796 GETE£ ; fFB$="S ,! THENi9G 
306 IFBf-'”’THEN790 
810 P=6 

820 INPUT.” 3SBS9 NUMERO" ;F 

838 IFp? 1 40RP-CI THENPR INT” KHO SOLTANTO»!* POSSIBILITÀ'" -GOTO820 

G4G T$="IM»?HRI SCELTO" 

85G LS^’W/UOI CONTINUARE QUESTGPROGRAHUR" 

360 OH F GGSU2930, 1696, 1830.- 2100, 2356, 2600,2323 ,3360, 3330,3460, 26 10, 3810/3386,41 
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1G 

£76 

33G 

396 

5tiy 

910 

920 

930 

343 

930 

966 

976 

il 


PRINT"BESI BER I RI CONI NC IFIRE " 

INPUTCi 

IFLEF7i<C£.. 1>=’ , 3"THENGC70190 

END 

STOP 

Remi. DI -PITAGORA** 

FRI NT "3” 

PRIN7TÌ 

FRINT"HIL 7E0REÌ1R DI PITAGORA 1 ’ 

PRIHT" (TRIANGOLO RETTANGOLO IN FD.” 

PRINP'WOr JPRINT-BC-fl" 'FRINro^O' 1 :PP7N*'"AL7Z2Zrt=H" : PRIN7' ! DH=F" 'FRINÌ !! BC~G 



930 I NPUT V£ .* X$ ” ; V $ .• X$ 

930 I F¥$<> :, fì "ANDYiO "B" ANDYiO" C RNBViO" H ” 3N 
1300 IFGUV=10THENFRIN7"ÌS1CN Vfi BENE. w :GOTQ980 
1313 PRINT "VALORI" 

1320 INPUT" Y> X" ; V, N 
1006 IFV$' ,, F''nHDX$="A’ , 7HE-U2S0 
1043 IFY$= :, fi "AND;»;ì="F"THtN 1 200 

i ose i f v j" cr rnen:ì- i: b i’theni ose 

1003 IFV$~ I, 2" RNBXÌ= h C" THEH 1 SSO 
1073 IFV$- "A" RNEX^= , 'C ,, 7HEN 1 300 
1000 IFVÌ= ” C^NBXi^WTHENl 350 
1090 IFVÌ- s R ,, fiNIKÌ= ,, 3 ,, 7HEN13S0 
U8S I FVÌ= r: B " RriBX$= "A 15 THENÌ433 
1113 1 F Vi* " H" ANpXÌ= "F ” THEN 1 430 
1120 I F Vi= " F 1 1 ANBXi = "H " THEÌ4 1 450 
1133 I F V i s H " ANDKi = " E " THE N 1 4S0 
1148 lFVÌ= i 'E"BHDXi= ,, H ,t THENl30© 

1130 i r¥i= E" ANÌ5X$= ,l F ,! THEN1 538 
1 163 IF.YÌ = "F" ANBXi* "E" THEN 1 530 
li 78 I rY$- "C 1 - RNDXi = "E :r THEN 1 368 
1133 I FV$= “E" ANDXS* "C" TBEN 1383 
1150 I F Vi»" B" ANDXi* ! 'F" THEH 1 560 
1200 IFVÌ="F*RNBX*==’ , £"THENi5Se 
1210 I F Vi- Ti C " ANDXÌ~ ,! ft" THEH 1 436 
1220 I F V$= 11 A " RNBXi = ’ ! C " 7HEM 1 450 
1230 I F¥$~"£' : ANBXi *"fl :, 7HEN 1430 
1240 J PVÌ= " A ' ! RNDXi= ’’B " THEN 1 3O0 
1256 IFV$“"fi‘'nNE^£=”E' : THEH1610 
1260 IFVi= "E’ : fiNBXÌ= "ATHEN 1613 


HEHCLiY=i0 


1373 GOTO 1638 
1330 Z~£QR<V12~Xt2) 
1350 GOTO 141 3 
i4O0 Z*S8R(XT2-V72> 
1413 ?RINT"AB=” 

1420 GOTO 1636 
1430 Z-VT2/K 
1440 GOTO 1460 
1433' z-y.iz/y 
1460 PR I NT "EH= M 
1473 GOTO 1630 
I486 Z=Vt2/H 
1490 GOTO 13 10 
1500 Z=Kt2/Y 
1510 PRINT”HC~ ,i 
1520 GOTO 1630 
1530 Z=3QR<X*V> 

1540 PRJNT "AH*" 

135S GOTO Ì630 
1560 Z=Y12/X 
1570 00701590 
1536 Z-XT2/V 
1590 ?RIN7’ : 3C= !T 
1606 00101630 
1610 Z a SQR(X»Y> 

1620 GOTO 14 10 
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Scrivi anche tu 


La collaborazione a Commodore Computer Club è 
aperta a tutti gli utenti di sistemi CBM clic abbiano 
sviluppato programmi e routine originali e d inte- 
resse generale o che desiderino fare partecipi gli 
altri lettori delle scoperte e delle osservazioni fatte 
per una migliore utilizzazione di queste macchine* 
Per collaborare è sufficiente inviare i propri la- 
vori all’attenzione della redazione, che le esaminerà 
tutti con uguale interesse e sollecitudine* 

Gli articoli debbono pervenirci scritti a macchi- 
na o con stampante* I listati allegati debbono essere 
accompagnati dalla copia su cassetta o su dischetto 
per una rapida verifica della foro validità cd esattez- 
za* Pei compensarvi per questa spesa la redazione vi 
spedirà a stretto giro di posta due cassette e/o di- 
schetti nuovi per ciascuna cassetta da voi inviata, 
indipendentemente dal fatto che il programma regi- 
strato venga accettato per la pubblicazione* 

Ciascun articolo e/u programma pubblicato, in- 
vece, verrà compensato con Pluvio d’una intera sca- 



tmuìiiiìSliarì 


tola di cassette e/o dischetti, 

Gli autori, naturalmente, si assumono ogni re- 
sponsabilità circa l 'originai iti dei lavori inviati i cui 
diritti di riproduzione sì intendono ceduti illimita- 
tamente all'editore di Commodore Computer Club 
per l’ utilizzazione sulla rivista, per la partecipaselo- 
ime a banche per lo scambio di programmi e cosi via. 
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Non occorre essere 

su permeili 

per capire i computer 


Il calcolatore ormai è entrato nella nostra vita c accanto alle applicazioni gestionali e 
scientifiche si vanno sviluppando utilizzazioni domestiche c personali. Capire i 
computer, perciò, non è piu un privilegio di pochi tecnici, ma un’esigenza per quanti 
vogliono vivere pienamente la civiltà del nostro tempo* L’approccio al computer è un 
problema di corsi specializzati e di libri, ma per seguire devoluzione di questo 
appassionante settore, occorre informarsi costantemente delle strategie dei 
fabbricanti e delle prospettive della ricerca. 

Perchè nessuna tecnologia dipende dalle politiche dei fabbricanti come quella dei 
u calcolatori”. 

“Computer 11 c il solo news-magazine italiano specializzato che mese dopo mese vi 
informa sulle strategie dei costruttori, senza veli e con un linguaggio accessibile 
anche ai meno esperti* 

Chiedete una copia omaggio cd accertate vene* 


Computer 

Più che una rivista d'informatica 
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CP/Maker 

Occorrono soltanto 5 minuti e L 
! ,450.000 (Iva esclusa) per elevare it 
livello operativo standard del vostro 
Commodore, aggiungendo CF/M ed 
una sostanziosa RAM da 64 K, E non si 
tratta di un’altra scatola da applicare, 
perché questo modulo si inserisce a in- 
nesto nell’attuale console. 

Non occorre alcuna nuova al ime il- 
lazione, nessuna saldatura, nulla eli 
nulla. 

Il CP Maker mette a vostra disposi- 
zione una massiccia RAM da % K. Il 
microprocessore Z SO, incorporato nel 
CP/Maker vi consentirà inoltre di usare 
il vostro 6502 come processore intel- 


ligente di I/O. 

Osservate inoltre tutti questi altri 
vantaggi di CP/Maker; 

* compatibilità con tutto il software 
CF/M; 

♦ compatibilità con tutto il normale so- 
ftware CBM. compreso il VisiCalc 69 
K; 

♦ funzionamento simultaneo di Z SO e 
6502; 

* i linguaggi comprendono CR 80 (il 
compilatore pi Ci ve luce in Basic per i 
microj. C- Basic, M-Basic. M T -Pascal , 
PLl. ClSCobol, Fortran,., MT Paseal, 
FLl , CI$Cobol t Fortran.,. 

La scheda deve essere montata al- 
l'interno del contenitore del Comma- 
dure. Le scheda usa inoltre [ 'alimenta- 



tore del CBM, Una volta chiuso, il con- 
tenitore si presenta come un normale 
elaboratore. Ma in effetti è diventato 
molto di più. 

La Memoria ulteriore può essere 
suddivisa nello spazio di memoria del 
CBM usando le locazioni FFFG ■ FFF 
7 che non sono correntemente usate 
dal CBM. Inserendo di nuovi i dati nel- 
la locazione FFF0 - FFF2, lo Z-S0 può 
essere attivato fornendo la sua inter- 
ruzione non mascheratale e collegan- 
dolo al blocco dì memoria da 64 K. che 
è stato caricato con un sistema opera- 
tivo CF/M, [ dati vengono scambiati 
tra il 6502 e lo 2-80 attraverso due 
entrate di I/O a doppio canale. Si trat- 
ta di un trasferimento asincrono che 
usa le lince dì prova preliminari di rete 
in hardware sulle entrate per controlla- 
re il trasferimento. Un canale porta i 
dati da trasferire mentre il secondo ca- 
nale porta le informazioni relative al 
tipo di dati in corso di trasferimento 
(byte, blocchi, eoe,,} e la loro destina- 
zione o la loro provenienza (tastiera, 
video, ecc,). 
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Cosa regali a Natale al 

tuo Vie? 


ANCHE il tuo Vie quest'anno s'aspetta un regalo. 
Ecco la gamma degli accessori per la tua scelta. 

{ T rs parentesi i prezzi (VA esclusa) 


Perifariche 

VIC 1530 Registratore a cassette (L 120 . 000 ) 

Per memori;; zare facilmente programmi e dati su normali cassette 
magnetiche. 

VIC '515 Unità stampante (L6SO.OOO ) 

Stampa su carta quanto appare su! video; programmi, lettere, dati, 
grafici 1. 30 caratteri al secondo). 

ViC 1 540 Unità a disco (floppy disk) (L 650.000) 

Veloce unità di memoria di massa ad alta capacità, Può immagazzi- 
nare fino a 170.000 caratteri su ogni singolo disco. 

VIC 1020 Modulo ‘d 'espansione {L29S.00Q) 

Permette di ampliare il sistema fino alla sua configurazione massima 
E32K Ram) utilizzando contemporaneamente diverse cartucce. 

Espansioni 

ViC 1 21 G Cartuccia da 3K di memoria (L.$$000) 

Espande la memoria RAM del Vie dì 3K , 

VIC 1 1 1 0 Cartuccia da 8 K fi. 98.000) 

VIC H11 Cartuccia da 16K fi. ì 72-000) 

Cart. programmazione 

VIC 121 1 Cartuccia "Super Espander" (L. 75.000) 

Aumenta incredibilm.eme le capacità del computar colori, suoni 
memoria, rendendo possibile lg realizzazione di grafici ad alta risolu- 
zione, Nella stessa cartuccia sono inclusi 3K RAM. 

VIC 1212 Cartuccia "Programmerà Aid" (L 47 - 500 ) 

Contiene più di 20 nuovi comandi BASIC ed è indispensabile pei 
scrivere editare e rimunerare programmi evoluti. 

VIC 1213 Cartuccia "Machire Language Monitor " (l. 47SOÙ) 

Accessori 

VIC 1311 Comando per giochi (joistick) fi. 13 -SPO) 

Permette di muoversi nelle 4 direzioni di "sparare" r. di iniziare i vari 
giochi di movimento. 

VIC 1312 Comanda a manopola par giochi (paddi*) (i. 22.500) 

Adatto per i giochi a 2 persone, e segnala movimenti in orizzontate e 
veri reale, 

Cartucce viieogiochr 

VIC 1901 Avenger (I vendicatori) (L 37.000) 

Gli invasori spaziali stanno assaltando la terra. L'astronave si difende 
sparando ed evitando di essere colpita. 

VFC 1902 Star Batti* - Guerre Stellari fi 37.000) 

Una serie di astronavi nemiche attacca in forze. Rapidità e precisio- 
ne sono necessarie per la vittoria. 

VPC 1904 Super slot (slot maghine) fi 37.0ÙÙ> 

Identica alla macchina "mangiasoldi" di Las Vegas, ha m piu effetti 
musicali e sonori di grande effetto, 


VIC 1905 Jefly mcnsteri (i mostri di gelatina) fL 37,000 

Del mostri-fantasmi inseguono il giocatore. Bisogna completare il 

percorso senza essere presi. 

VIC 1906 Afien (L J alieno) (L 37,000) 

4 alieni contendono il labirinto all'astronauta. Soia la loro eUmi na- 
zione porta alla salvezza. 

VfC 1907 Super Lander [atteraggio lupara) fi. 37.000) 

L'astronave deve atterrare su un pericoloso pianeta. Per una mano- 
vra perfetta ci vuole un ottimo pilota. 

VIC 1908 Poker fi. 37000/ 

Come a! casino à possibile vincere o perdere grandi fortune. Disegni 
dettagliati ed effetti sonori danno un aspetto di vero realismo. 

VIC 1909 Rood Racn (corsa automobil ittica) (t. 37.000} 

Riflessi pronti ed abilità di guida sono indispensabili per non uscire 

di strada, 

VIC 1 910 Rat rate (corsa dei topi) (L. 37.000} 

Il percorso è pieno di gatti e di pericoli. Solo un topolino in gamba 
può mangiarsi le porzioni di formaggio, 

VIC 1 912 Mole attaché (l'invasione dell* talpe) (L, 37.000} 

Ci sono se] buchi nel terreno e le talpe fuoriescono in continuazione. 
Non è facile impedirlo con un solo giocatore ma non è impossibile. 
VIC 1 919 Sargon chess (scacchi) fI.37.0CJ0/ 

Secondo gli esperti é un animo programma dì scacchi. Il Vie è uno 
sfidante eccezionale. 

Argomenti tecnici e matematici 

VIC 2011 Cartuccia VI C-stat (L 95.000) 

Particolarmente olile per realizzare grafici speciali e calcoli statistici 
quali la varianza media aritmetica la deviazione standard. 

VIC 2012 Cartuccia VIC - GRAPH fi- 95.000) 

Con questo programma è possibile studiare le più complicate equa- 
zioni e funzioni disegnandole graficamente. 

VIC 3402 Cassetta matematica fi. 24. 500) 

Contiene esercizi dì aritmetica, algebra, geometrìa e trigonometria 
per controllare il livello raggiunto. 

VIC 3404 Cassetta biologìa fi. 24.500) 

170 domande di biologia in 6 diverse sezioni, tutti gli argomenti 
delta materia. 

Linguaggi di programmazione 

Vie 2013 Vie FORT H (L 05.000} 

Il Vìe 20 sé potenzia con una gamma infinita di possibilità con 
questo nuovo linguaggio. 

VIC 2501 Introduzione al Basic - parte prima {L 24.500) 

Un manuale dettagliato per apprendere il linguaggio Basic, corredato 
da 2 cassette con esempi, 

VIC 2502 Introduzione al Basic - parte seconda fi .24.500) 

Varie 

Vie 4011 Vtc-REL fi .95.000) 

Indispensabile per controllare il funzionamento di allarmi antifurto, 
porte automatiche, telefoni, trasmittenti ed apparecchi similari, 

VIC 4012 VrC-SWlTCH (L 35.000) 

Un sistema completo per col legare più video tra loro. 

VIC 2505 Confezione di 1 cassette vergini fi. 5.000/ 

Par registrare program mi. 



Ecco dove trovi il tuo VIC 20 


Bit Shop Primavera 


Negozi G.HT . 



feac) 


Negu/i Esperi 



Negozi Singer 


SINGER 


t ii H i misceli' e 



Salmairaghl 



keriipurtrii Italiani) 

Via Zurigo. 1 4 



2014 7 Mihno-Td. U2/41 .55.3% - 4 1 54.883 


J migliori negozi di elett rodarti critici t Hi Ti 
J migliori negozi Jj giocattoli 
f migliori - eumputer shop' 


Disi ri liuti uri Cimi m udore: 

l iguriu . Pirici Informatica 

Pia zza Cavour, 19 - 16043 L biava ri 
Tei. 0185/30. 10.31 

Piemonte - Aha Elettronica eli Calumili 

Via Passati, 5/C.' - 1014: Torino- Tel. 0] ì/33.20.65 

Lumbarriia - Hnmic Personal Cnmputérs «ri 

Piazza Oc Angeli. 3-20346 Milano- i'c i - .. : 1 ' 

Veneto. Friuli-Venezia Giulia, 

Trentino-Afri) Adige 
CO,R,EL> Italiana Udine 

Via M e rea irivccc lito. 28 - enfiti ( Mine 
Td. (1437/29. |4.6h 

E mi I in -Ko magna, Marche -SJI.R.srl 

Via Faentina 175/ A 
4 fio |n Fornace Zar alt ini (Ravenna I 
lei. 0544/46.32.00 

Toscana - M.C,S. Spa 

Vili Pier Capponi. 8? - 50132 Firenze 
Tei. 055/57. 13.8(1 

l mbria - Vito Lazio 


Lazio, killer Italia srl 

Pie Asia, 21 - 00144 Roma Liir - 'lei 116/5* 4. 16.458 

Abruzzo, Molise - Pmgma System srl 

Via Tibortina. 57 - 65100 Pesami - Tel. 085 750.88? 

Campania - Grani System* - Elaboratori Gesti una li 

Via P. (irnienti no, 4 

84100 Salerno -Td. 089732 |7.8| 

Puglia - Ma.se Ili \ Puffino 

Via 1 .. Zuppo tu, 5-71 100 Foggia 

Tel- 0881/76. 1,11 

Business AufomatUin System.*, srl 

t . lituo De Gemmi k 46/B-46/C-4h-48/A-487F! 

70124 Bari -Tel. 080/22 . 75 . 75 - 22- 73,44 

Calabria * Siiangcla Compiile™ srl 

Via Nicola P a risii). 25 - 87 3 no Cosenza 
IVI.tF7H4775.7 4 I 

Sicilia - Ldileomput Progetti 

Vili La Farina. 14 I [y ) - 98100 Messina 
l ei, 090/29-28,269 

Sardegna * S.E.E. - Sistemi Integrati Informativa 

\ i;i S. Lucìfero, 9fi - 09 (10 Cagliari 
Td. 070/66,37.46 


Alias System st] 

Via Guglielmo Marconi. 17 - 01 100 Viterbo 
E e] . (1761/22.46.88 


Oppure: 

k ebii Computer - Tel. 02/61.22.371 





distributore esclusivo supporti magne- 
tici Hhòn Postene per : Milano e Pro- 
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:ici, d 
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;hi, disk 
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apy, ni 


oppy, nastri 


garantiti, 


sicuri, fidati 

dall’amico 


specialista: 



S.3.S. 


vincta e Provincia di Pa via 


L.go Promessi Sposi, 5 Milano Tel. 8435593 





¥IC 20, ora puoi giocare 
con in vero computer. 


VIC 20 computer. Un bel 
passo avanti invece dei soliti 
videogames. Allo stesso 
prezzo però! Con VIC 20 
non ti limiti a giocare con le 
cassette: ti inventi tu i tuoi 
giochi, impari a programmare 


in “Basic 1 " la lingua de! futuro, 
lo usi per la scuola, per 
Oufficio, per la casa. 

VIC 20 è un vero computer. 
E quando vuoi farlo diventare 
uno strumento ancor più 
sofisticato basta espanderne 


la memoria, aggiungerci una 
stampante, ii floppy.., il tutto 
a prezzi eccezionali. 

Come il VIC 20, del resto: 
495,000 + IVA. Un consiglio? 
Compra subito il tuo VIC, 

Agli indirizzi indicati a pagina 66. 



C Commodore 

1 COMPUTER 


ETHOS PISA 




